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A full set of database tools — 
to enhance performance and © 
simplify administrativ... 


Making the most of your DBMS is a lot easier with the 
right tools. Now there’s a full set available from Systems 
Center for two of today’s most popular relational 

environments: DB2 and SQL/DS. 


Our DB2 software products 
(DB/SECURE™ DB/AUDITOR™ 
ls DB/REPORTER.™ and 

ee DB/OPTIMIZER™) address urgent 

needs with innovative, effective solutions 

—streamlining security, simplifying auditing, 
speeding report generation, and boosting 
system performance. All while eliminating the 


errors and delays associated with manual DB2 
administration. 


In the world of SQL/DS, our 
DB/REORGANIZER™ product dramatically 
enhances performance and efficiency in a 
fast-changing database environment. Our 
DB/EDITOR™ offers exceptionally 
convenient full-function table editing. 
And our DB/REPORTER.™ with its out- 
standing data manipulation and formatting 
facilities, makes even complex reports a 
relatively simple matter. 


So why wait? Start making the most of your 
environment — and yourself. Call onwrite 
today: Systems Center, Inc., 1800 Alexander 
Bell Drive, Reston, Virginia 22091. 


800-359-5559 703°264-8000 8 - 


A NEW YORK STOCK EXCHANGE COMPANY 
' 


RELATIONAL DATABASE PRODUCTS VM SOFTWARE PRODUCTS NETWORK DATAMOVER PRODUCTS NETWORK ADMINISTRATION PRODUCTS 


’ 
© Copyright 1989 Systems Center, Inc DB/AUDITOR™ DB/EDITOR™ DB/OPTIMIZER™ DB/REORGANIZER™ DB/REPORTER™ and DB/SECURE™ are trademarks of Systems Center, Inc. and its subsidiaries ' 
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“Our network moves 
enormous loads quickly. 


So does our CICS.” 


“At CSX, we have 61 production CICS 
regions and seven million transactions 
per day. With The Monitor For CICS, we 
see problems long before our users do.” 

Rail transportation. Container shipping. Gas pipe- 
lines. Resorts. CSX is a $13 billion giant. With over 
21,000 miles of rail, 6,000 miles of natural gas pipeline, 
and 5,000 miles of fiber optics, CSX needs real-time 
status to service its customers. 

So at their Jacksonville, Fl and Baltimore, 
land, facilities, CSX uses CICS to track status < 
ntory —and relies on The Monitor For CICS to 

manage CICS performance. “The Supertrace feature lets 
us look inside an application and gauge its effects on 
system performance,” says Jason Butler, Manager, 
Technical Services. ‘We can trace application logic 
and evaluate resource consumption right down to the 
event level.” 

“We've built a unique monitoring system that is 
PC-based and set up so that Monitor commands are 
automatically executed to identify poor response times. 
This lets me spend more time with features such as the 
storage display. Now when a problem arises in CICS, I 
can alter storage or delete ICE/AID chains rather than 
shutting down and cold starting the system.” 

The Monitor is the complete CICS performance man 
agement system that'll help you save the day. Become 
the hero in your CICS community! For a free, 30-day 
trialof The Monitor For CICS, call us today at 
1-800-227-8911 or 1-703-893-9046. m 

Lanomiek 


MINDS YOUR BUSINESS 


Landmark Systems Corporation 
8000 Towers Crescent Drive, Vienna, Virginia 22180-2700 
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Productivity 
Down On\The 
DASD Farm 


COVER: 

Down on the DASD farm 
you will look at DASD 
utilization from the 
productivity perspective 
with a tongue-in-cheek 
comparison to a crop- 
production survey. 
Turn to page 104 for details. 
Cover illustration by 
Leo Monahan. 


MAINFRAME JOURNAL© (ISSN 
0895-5751) is published monthly by 
Thomas Publications, Inc., 

10935 Estate Lane, Suite 375, 

Dallas, TX 75238, (214) 343-3717. 
Second class postage paid at Dallas, TX. 


SUBSCRIPTION RATE: Subscriptions 
are free within the USA and Canada. 
One-year foreign subscriptions are $96. 
POSTMASTER: Send address changes 
to: MAINFRAME JOURNAL, P.O. Box 
551628, Dallas, TX 75355-1628. 
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2 Find Time For Your Expanding Role As A Database Administrator 
Organization is the key to time management. By Robert Engle 


7 An EDP Control Audit With Teeth 
IS and Internal Audit departments form unlikely partnership. 
By Avery C. Cloud 
7 A Tactful Way To Program 
Blind programmer performs the same job as a sighted person. 
By Joanne Kimbler Cooper 


1 0 Automated Service Level Management And Its Supporting Technologies 
Technologies aid data processing professionals. By Jack Noonan 


ae ee a ee 


38 MVS/ESA Architecture, Modeling And Performance 


Implement the new architecture with these techniques. By J. William Mullen 


5 i) VM In The Development Center: Program Writing In XEDIT 
Examine VM’ s edit environment. By Michael Seadle, Ph.D. 


$1 Converting The REXX Way 


VM's System Product Interpreter offers control. By Christine Gogots 


93 VSE/SP Job Control 


Release 2 offers enhancements. 


98 CICS/ESA 3.1: It’s Been Announced! 
New version satisfies 200 requirements. 


By Mark Hanna 


By Phyllis Donofrio 


1 a A Tuning VSAM Index Control Intervals: Calculating VSAMs Key Compression 
Learn how to print and read index records. By Michael D. Sachais 
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1 Raising Your IQ (ISPF Quotient): ISPF Techniques For Advanced Users 
Increase your productivity when using ISPF. By David Shein 


5 DB2 And The OS/2 Database Manager 
Find out key aspects of the OS/2 Database Manager. 


By Howard Fosdick 


5 Understanding Program Exceptions 
Know the difference between an ABEND and a program exception? 
By Harvey Bookman 


6 TSO/E REXX: An Overview 
REXX is easy to learn, yet powerful. 
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21 Automated Operations: Do Not Automate What You Can Eliminate 
Implement projects to identify unnecessary tasks. By Jeff Murrell 


62 Dataset Management Reduces DASD Utilization, Boosts CPU Performance 
GPM tracks tapes and disks with EPIC/VSE. By Rachel Payne 


85 The DASD Farm: How Does Your Garden Grow? 
Become more conscious of DASD productivity. 


By Zeida Heavener 


By A. L. Jones 


1 10 Product Review: EMC Corporation 
Orion Solid State Disk battles poor response time. 


1 12 Vendor Profile: Integrity Solutions, Inc. 


By John Kador 
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1 1 4 Viewpoint: The Role Of The Help Desk In The DP Center. 
By Ronald J. Muns 


October 1989 * Volume IV * Number 10 


I 


MAINFRAME JOURNAL * OCTOBER 1989 


Systems software for MVS data centers: 


Enter the world of 
total administration, total support. 


Presenting CA-UNIPACK™ /DCA—an advanced 
software system from Computer Associates that 
automates the complex tasks of MVS data 
center management. 


CA-UNIPACK/DCA-DATA CENTER ADMINISTRATION 
Consisting of: CA-NETMAN®/FINANCIAL-INVENTORY, 
CA-NETMAN®/PROBLEM-CHANGE, 
CA-NETMAN®/OLCF and CA-NETMAN®/MRM. 


CA-UNIPACK/DCA automates and integrates: 
hardware and software inventory management, 
help desk and problem tracking, configuration 
changes, invoice reconciliations, cost alloca- 
tions, budgets, vendor contracts, user charge- 
backs, order tracking and more. It has the unique 
ability to interrelate these diverse activities so that 
a change in one area is immediately and auto- 
matically reflected in another. Additionally, 


GaOMPUTER® 
TSSOCIATES 


Software superior by design. 


CA-UNIPACK/DCA provides specialized functionality 
in managing and analyzing activities related to 
PCs and workstations. 


CA-UNIPACK/DCA provides online, realtime 
control over critical managerial functions while it 
reduces costs, increases staff productivity and 
ensures sound decision making. Total administra- 
tive control. Only from Computer Associates. 


And only Computer Associates offers 
CA-UNISERVICE®/II, c secure link between your 
mainframe and CA's Customer Service System 
24 hours a day. You get online access to software 
fixes, interactive problem resolution, plus product 
tutorials and more! 


Call Dana Williams today: 
000-645-3003 


© 1989 Computer Associates Interna 
744 Stewart Ave., Garden City, NY, 11. 


¢ World's leading independent software company. 


¢ Broad range of integrated business and data processing 
software for mainframe, mid-range and micro computers. 


¢ Worldwide service and support network of more than 100 offices. 


Resource & Operations Management « Financial « Banking * Graphics * Spreadsheets « Project Management 
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CONTINGENCY JOURNAL: 
The Magazine For Business 
Continuity Planning 

When we began the process of selecting the 
editorial content for the September issue of 
MAINFRAME JOURNAL, one topic we had 
planned to feature with several articles was con- 
tingency planning. The area of contingency plan- 
ning, as well as disaster recovery and security, 
has proven to be extremely popular with our 
readers. In fact, we have had more requests for 
article reprints on these topics than any other. 
After evaluating the need for this type of infor- 
mation, we decided to forego periodic coverage 
in MAINFRAME JOURNAL and instead, to launch a completely new magazine titled 
CONTINGENCY JOURNAL: The Magazine For Business Continuity Planning. 

“Contingency Planning is the ability of an organization to fulfill its mission, no 
matter what,’ according to Philip Jan Rothstein, President of Rothstein Associates, 
Inc., a management consulting firm in Ossining, NY. ‘‘Those ‘no matter whats’ are 
tough. Sure, fires, floods and ‘dust and rubble’ belong here but what about the dis- 
ruption of critical information?’’ Some of the ‘no matter whats’ to be covered in 
upcoming issues of CONTINGENCY JOURNAL ate: 

¢ Contingency Planning ¢ Fault-Tolerant Systems 
¢ Disaster Avoidance ¢ Electronic Vaulting 


Bob Thomas 
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¢ Disaster Recovery 
* Security 

* Data Recovery 

¢ Software Viruses 
¢ Power Outages 


¢ Legal Liability 

¢ Business Continuity 

« Hostile Takeovers 

* Loss Of Key Employees 
¢ Strikes 


Sally Webb 


Circulation Manager 
Janice Porter 


The premier issue of CONTINGENCY JOURNAL will be launched in January 1990. 
If you think CONTINGENCY JOURNAL might be of benefit to you or someone else 
in your organization, reserve your copy now by sending in the Free Subscription Form 
in the ad on page 11. 


FOCUS Newsletters To Be A Reality 


Your response to MAINFRAME JOURNAL's six FOCUS Newsletters has exceeded 
our expectations. 

Quite frankly, back in June when we first announced the FOCUS Newsletters in 
that issue of MAINFRAME JOURNAL and in our Action Card Deck, they were more 
of a speculative idea than a concrete actuality. At that time, we did not know if there 
would be sufficient interest to support not only the costs incurred with a series of 
newsletters, but also more importantly, the time and effort that development and 
production would take. Since June, the faith and confidence demonstrated by all of 
you who subscribed ‘‘sight unseen’’ is very much appreciated and has dictated that 
we cast the concrete and make the FOCUS Newsletters a reality. 

Just as producing a solid software package that lives up to the customer’s expec- 
tations takes time, so does developing solid FOCUS Newsletters on MVS, VSE, VM, 
CICS, VSAM and DB2. The objective of each FOCUS Newsletter is to provide more 
specific and timely information than is possible in MAINFRAME JOURNAL. Our 
target date for all six FOCUS Newsletters is January 1990. For subscription infor- 


mation see page 45. 


Assistant Circulation Manager 
Nancy Crawford 


Administrative Manager 
Marian Davenport 
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subscriptions are $96. 

All subscriptions, remittances, re- 
quests and changes of address should 
be sent to MAINFRAME JOURNAL at 
10935 Estate Lane, Suite 375, Dallas, 
TX 75238, (214) 343-3717. 


MAINFRAME JOURNAL® is copy- 
righted 1989. All rights are reserved. 
Reproductions in whole or part prohib- 
ited except by permission in writing. 
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Data Processing — Career Or Obsession? 


‘*Why am I doing what I am doing?’’ is the common question 
asked by many a brave data processing professional while 
scratching his way through another day ‘‘in the business.’” Why 
is this question asked? Let’s get back to the basics, the ground 
floor, the place where it all started — the beginning. 

In the beginning, computer technology was the new frontier 
that lured young men (few women ventured into the forbidden 
zone) into searching for the perfect career. Visions of white lab 
coats, blonde girlfriends and new Corvettes made the life of a 
data processing professional the only logical choice. You did 
not start the adventure as an executive — you were allowed to 
start at the beginning. Dues had to be paid, hours had to be 
worked before you could be worthy of receiving the ground- 
floor opportunity. Ground-floor opportunities were abundant and, 
unfortunately, were rewarded with ground-floor wages and could 
be equated to working until one was ground into the floor. Take 
a look at the industry from the *60s to the present. 

The ’60s brought the excitement of the new frontier. Main- 
frames were growing in size and capacity. Data processing was 
a brave new world to be explored. Creativity was the key word 
in programming, limited only by the amount of bytes of storage 
available. The cloak of mystery surrounded the data processing 
field. The programming wizard was free to weave his magic 
spells — card input (what a wonderful innovation). COBOL 
was a godsend, RPGII was a language to be reckoned with, 
PL/I was the language of the future. 

The °70s brought larger mainframes and more storage. Brave 
new concepts for program development appeared: structured 
programming, documentation and code walk-throughs. Restric- 
tion of programmer creativity became the trend. Standardization 
and management restrictions now replaced the limitations that 
mainframe storage once commanded. Programming languages 
were developed that even the novice could code and understand. 
Yes, it was a dark time for the creative wizard. But all was not 
lost, a method for producing on-line, user friendly, interactive 
programs was being refined. Yes, CICS was becoming the state- 
of-the-art tool. 

The ’80s, the years of budget restraints, staff reductions and 
new wave management proved to accelerate the demise of the 
coding wizard. Databases, fourth-generation languages and 
computer industry publications proved to be a formidable foe 
for the wizards. Assembler language became the Holy Grail of 
the 80s, lost forever. The refinement of the personal computer 
further eroded the programmer mystique. Laymen understand- 
ing the inner workings of programming tools and computers 
stole the soul from the magic spells; the wizard was now per- 
ceived as being just a mere mortal. 

Look at what it took to become a wizard. You were allowed 
to work your way to Valhalla in progressive stages: tape librar- 
ian to production control clerk to tape hanger to operator to 
programmer to programmer/analyst and, if fortunate enough to 
survive, the first marriage, the kids, the long working hours, 
the divorce, the cure for alcoholism, the second marriage, the 
high blood pressure and medical problems that accompany years 
in data processing. You will finally excel to the position of 
systems analyst. 

But life at the top is not all it is cracked up to be. You find 
that through the years of trials and tribulations, you neglected 
to receive the one thing that eluded you over the years — a 
college degree in data processing or a related field. It seems that 


20 years of experience is now replaced by two-to-four years at 

an accredited institution of learning. Yes, you have reached the 

bottom line. Real-world experience and treachery does not re- 

place the rookie with a degree from fantasy land. It is true, 
“Data is just a four letter word.”’ 

Thomas E. Williams, Jr. 

Sprouse-Reitz Stores Inc. 

Portland, OR 


VM Bigotry Revisited 

I would like to add to the letter of Rich Greenberg in his 
August 1989 response to Michael Seadle’s June 1989 article, 
““VM in the Development Center.”’ 

I agree that coding REXX programs are for the most part a 
“‘question of style.’’ However, in the example given, you will 
experience a performance degradation, especially as the pro- 
gram grows in size. 

The REXX interpreter will attempt to interpret all non-literals 
before passing the expression to the CMS environment. In the 
example given: 

EXEC NOTE MICHAEL '(’ NOTEBOOK PROJECT 
REXX must translate the first four variables to their respective 
values and then pass them to CMS. If on the other hand, the 
expression were coded as Rich suggested: 

‘EXEC NOTE MICHAEL ( NOTEBOOK’ PROJECT 
there is only one variable to be translated. 

Again, the program in question is a simple one and the par- 
ticular style does not make any difference. However, as pro- 
grams become large with more and more variables, you can see 
that style can make a big difference. 

Robert L. Hatcher 
Southern Company Services, Inc. 
Atlanta, GA 


4341 To AS/400 


In the May 1989 issue the article, ‘““Carolina Steel Makes the 
Most of VSE,”’ by Mary Lou Roberts could have been written 
about my company, Keyes Fibre Company. While there are 
many similarities, there are some significant differences: 

¢ We rely 100 percent on our database from Software AG 

called ADABAS and its Natural language 

¢ We rely heavily on third-party software 

* We do not have a systems programmer 

* Our centralized staff of 12 programmers/analysts supports 

a 4341, several System/36s and PC platforms in eight states 
throughout the United States 

* Our System/36 computers are linked together coast-to-coast 

* Our department’s budget has decreased over each of the last 

four years with a corresponding increase of service, quality 
and reliability 

* Our operations is partly automated; we now have only one 

shift and three people which includes our operations man- 
ager. 

Even though Keyes Fibre Company seems to be successful, 
the parent company is pushing a conversion of my company’s 
4341 to an AS/400. The conversion will probably take two 
years, cost $750,000, resulting in less capability. 

Will you consider an article on converting from a 370 ma- 
chine to an AS/400 or highlight a company that has made such 
a conversion? 


John M. Murray 
Keyes Fibre Company 
Waterville, MA 
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lf you're an IBM data center manager 
who installed a new sort during the past 
year, the chances are you switched to 
PLSORT. Because, during 1988 and 1989 more people switched to PLSORT than to all other 
competitors combined. 

Not only are we now #1 in sort conversions, but we are first in performance, first in value, 
first in features, first in ease of installation and first in universal compatibility. 

While you can't be the phirst to make the switch to PLSORT, you can still be the first to 
call us today, 1-800-862-SORT * Canada: 1-800-635-0574 


PHASE LINEAR SYSTEMS INCORPORATED 


AN ACR/TRITON COMPANY 
CIRCLE #78 on Reader Service Card A 9300 Lee Highway, Fairfax, Virginia 22031-1207 
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3390 Disk Drive Delays 


What exactly is causing the 3390 holdups is uncertain, but likely sources of delay may be the production of new platters or 
the head-to-disk assembly. Another strong possibility is that IBM is sitting on the disks until it can get the 3990 Model 3 controller 
to market; the advanced 3990 is not crucial to the operation of the new DASD in the short term, but it offers some important 
facilities that would greatly enhance this launch. In particular, the 3990’s Dual Copy facility will prove to be a considerable boon 
to the new drives. Source: Insight IBM publihsed by Xephon. 


Pre-printed Computer Lease Enforced 


The Missouri Court of Appeals has overturned a trial-court ruling and held that a pre-printed standard from lease agreement 
for computer equipment was not an unenforceable contract of adhesion. Because the lease did not leave the lessee without a 
remedy, the court was not able to make a finding of ‘‘oppressive unconscionability.’’ The decision is important to both software 
and equipment companies that use pre-printed standard agreements. It underscores the need to draft form contracts that contain 
reasonable terms and conditions, provide a remedy and take into account statutory consumer protections. Source: Computer Law 
& Tax Report, published by Roditli Reports Corp. 


Researchers Make Guinness Book Of World Records 


A team of six researchers at Amdahl Corporation (John Brown, Landon Curt Noll, B. K. Parady, Gene Ward Smith, Joel F. 
Smith and Sergio E. Zarantonello) has found the largest known prime number, a discovery worthy of the Guinness Book of World 
Records. The 65,087-digit number was found in the early-morning hours of August 6, 1989 as a result of the development of 
highly optimized algorithms and a combination of research, logistics and computer power. 

Finding the largest known prime number is the computing world’s equivalent of climbing Mt. Everest. The number, at more 
than 65,000 digits, is unimaginably large. By comparison, the number of atoms in the known universe can be expressed in less 
than 100 digits. Its usefulness lies in the application of computer techniques used to find the prime number, some of which can 
be applied to speed computer programs for geophysicists in oil exploration, aeronautical engineering, weather forecasters’ models 
and automotive design engineers and so on. 


U.S. Department Of Commerce Honors BMC Software 


The United States Department of Commerce has selected BMC Software, Inc. as recipient of the President’s *‘E’’ Award for 
Excellence in Exporting. To earn the *‘E’’ Award, an organization’s percentage of exports to total sales must exceed the industry 
average, both annually and over a four-year period. ‘‘The tremendous growth in our international organization is the result of 
BMC’s strategy to expand aggressively outside North America,’ explains Richard A. Hosley II, President of BMC. ‘‘Last year 
we opened an office in Tokyo and a European Support Center in England. This past August we opened an Australian office in 
Melbourne and there are plans for expansion in Spain and Denmark before our fiscal year is over.”’ 


Help Desk Institute International Conference 


The Help Desk Institute will hold its International Help Desk Conference February 11-14, 1990 at the Buena Vista Place, Walt 
Disney World. The Institute members are from large MIS organizations that have support staffs to help resolve hardware, software 
and communications problems and to perform analysis of problem history in order to reduce future problem occurrences. The 
conference will include industry leaders speaking on problem management, expert systems, problem resolution techniques, call 
management and the future outlook for support software. Highlighting the conference will be general sessions, multi-track special 
interest break-out sessions, vendor exhibitors, Birds Of A Feather (BOFs) and social activities. This conference is the single 
annual event that brings together leaders in Help Desk/Problem Management from industry and vendor organizations. For more 
information or to register, call (800) 248-5667. 
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Don’t Get Caught By SURPRISE! 


lf any of these are 
your concerns... 


Contingency Planning 
Disaster Avoidance 
Disaster Recovery 
Security 
Data Recovery 
Software Viruses 
Power Outages 
Fault-Tolerant Systems 
Electronic Vaulting 
Legal Liability 
Business Continuity 
Hostile Takeovers 
Strikes 
Loss of Key Employees 


_..then 
subscribe to 
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Almost anything TSO can do, 
Almost TSO™ can do better. 


Almost TSO supports dozens of users per address space instead of TSO’s one. Edit files, 
submit jobs and preview sysout for a fraction of TSO’s cost. Postpone expensive 
hardware upgrades. Prolong the useful life of your mainframe. No re-training is 

needed for ISPF PDF users. Save TSO for users who really need it. 
Under TSO, Almost TSO™ makes the best better yet! 


With Almost TSO and TSO together, you can edit files of any size and LRECL. Edit and 
browse multiple files concurrently. Cut and paste from edit, browse and even sysout 
files. The combination is unbeatable. 


Almost TSO is a multi-user VIAM and/or a TSO application. Stand-alone 
or put together it’s a winner. Call or write for all the details and ask about 
our 30 day FREE trial. 


Applied Software, Inc. 
Quality Software Since 1973 


840 U.S. Highway 1, Suite 250 ¢ North Palm Beach, FL 33408 ¢ (407) 626-4818 
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ISPF ISPF Techniques For Advanced Users For Advanced Users 


By David Shein 


ou have been using ISPF for a 

Y while now. For the most part, you 

like it. It provides a handy set of 
tools that are reasonably easy to learn and 
use. Also you have been using it long 
enough to find it reasonably comfortable. 
Even so, you sometimes find yourself 
performing tasks that are awkward or re- 
petitive enough to make you wish for some 
productivity-increasing shortcuts. Maybe 
you have even heard passing references 
to things like ‘edit macros’’ and ‘‘com- 
mand tables’? and you wonder whether 
these mysterious mechanisms are things 
you should know about. 

Does the above description apply to 
you? Read on! 

The focus of this article is on ways to 
increase your productivity when using 
ISPF. I will assume you already know 
your way around ISPF panels pretty well 
and that you are interested in knowing 
about some advanced techniques that can 
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help to leverage your productivity even 
further. 


Getting The Most 
Out Of PF Keys 


The default PF key actions which ISPF 
provides are mostly useful ones. How- 
ever, the ISPF designers recognized that 
different users would be using the product 
in different ways. They, therefore, made 
it easy to change PF key settings. You 
have two ways of changing PF keys. 
Method one is to select option 0.3 from 
the main menu. Method two, the pre- 
ferred method, is to enter KEYS in the 
command field of any ISPF panel. Doing 
either of these will present you with a 
panel containing the definitions for 12 PF 
keys; to change a PF key setting, just type 
over the existing setting. If your terminal 
is equipped with 24 PF keys (and you 
have so indicated on panel 0.1), pressing 
ENTER will show you the definitions for 


the other 12. You can continue to toggle 
back and forth between the two groups of 
PF keys by pressing ENTER. When you 
enter END (PF3), the current PF key set- 
tings will be saved and (assuming you use 
the KEYS command to reach this point) 
you will return to the task you were per- 
forming when you entered the KEYS 
command. 

A PF key can invoke almost any ISPF 
command. One very useful one is FIND 
IEF376I. When you are examining the 
output from a batch job using option 3.8, 
SDSF or other such utility, this FIND 
command will scroll past the JCL and 
system messages and go straight to the 
beginning of the SYSOUT for your job. 
This can be a great time saver. 

You can also set a PF key to invoke 
line commands in ISPF edit. You do this 
by prefixing the PF key setting with a co- 
lon (:). For instance, if you find yourself 
using the “‘insert’’ (I) line command fre- 
quently, you can set a PF key to the value 
:] and then invoke the command for what- 
ever line the cursor is on by just pressing 
that PF key. 

Before you begin rearranging all your 
PF key settings, a cautionary warning: do 
not change the settings for PF3, PF7 or 
PF8. The defaults for these keys are 
among the most heavily used commands 
in ISPF and experienced ISPF users rely 
on them with a trust that borders on in- 
stinct. If you change them, anyone who 
uses your account (possibly including you) 
may get confused. 

One final note. PF key settings are 
stored in your ISPF profile dataset so that 
ISPF can remember them between ses- 
sions. Some of the optional products that 
run under ISPF, however, have their own 
individual profiles with their own individ- 
ual PF key settings. SDSF is one exam- 
ple. Usually (but not always!) the default 
PF key settings for such products will 
simply mirror the ISPF defaults. This pre- 
sents a caveat and an opportunity. The 
caveat is, ‘‘always be aware of which 
function you are using because the PF keys 
may not do what they do elsewhere.’’ The 
opportunity lies in the ability to have PF 
key settings that are uniquely tailored to 
the active function. For instance, DA 
OJOB is a command that SDSF users tend 
to find themselves using frequently. So if 
you get into SDSF, enter the KEYS com- 
mand and set one of the PF keys to DA 
OJOB. You can then invoke that com- 
mand using a PF key but only in SDSF, 
which is the way you want it. 
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Edit Macros 


name implies: prebuilt sequences of ISPF 


edit commands. Using the edit macro ca- 


Edit macros are pretty much what their _ pability, you can define ‘‘canned’’ edit 


JC Macro 


ISREDIT MACRO 
ISREDIT LINE_AFTER 0 = '//TSO007 JOB + 


(accounting info), 


ISREDIT CHANGE "'” .ZF .ZF ALL 
ISREDIT LINE_AFTER 1 = ’// 


CLASS = A,MSGCLASS = R’ 


ISREDIT LINE_AFTER 2 = '/“JOBPARM R=room#’ 


SF 


It’s more than just a Job Scheduler! 


ISREDIT LINE_AFTER 3 = ‘//* 


ASF does much more ... 
... SO MUCH EASIER ! 


Now, with ASC (Automated SYSOUT Capture). ASF 
Release-2 includes our SYSOUT management facility ASC, 
which provides ISPF access toSYSOUT execution reports (and 
optionally SYSLOG data). Features include capturing output 
(by sysout class), interactive viewing via ISPF/PDF Browse, 
printing & extraction, as well as short & long term archival. 
Reports may be archived for days or years (as requested by the 
installation), using a two tiered DASD/TAPE archive concept. 
Additional ASF feature upgrade cost: $0.00 


Also included with Release-2, is APM (Automated Problem 
Management). APM is a _ comprehensive problem 
management and incident reporting facility. It automatically 
logs each production job related incident as it occurs, and allows 
manual creation & update of problem data. Problems may be 
routed and rerouted to individuals until resolved. Management 
reports ensure that no logged incidents/problems go 
unaddressed (the operator cannot forget to log a problem 
anymore). Additional ASF feature upgrade cost: $0.00 


Give us a call to receive a full function trial copy of ASF. See 
for yourself what other installations are so excited about. 


Chaney Systems Support 
Wi8180 7, anesville Road 
Muskego, WI 53150 
(414) 679-3908 
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command streams to perform repetitive or 
complex functions. You can then invoke 
the macros during an edit session to per- 
form the specified functions on demand, 
without having to key in the commands 
each time. As a general rule, an edit macro 
can issue nearly any edit command. There 
are also some additional functions to help 
you control the movement of the cursor 
while an edit macro is executing; this is 
important when, for instance, a macro 
needs to issue line commands. 

For MVS, an edit macro is just a CLIST 
beginning with the statement ISREDIT 
MACRO and containing edit macro com- 
mands. You invoke the macro by entering 
its name (that is the CLIST name) in the 
command field of the edit panel. Your 
macro may or may not require operands, 
depending on what it does. For more de- 
tailed documentation of the rules for cod- 
ing edit macros, see the IBM manual, 
ISPF Edit and Edit Macros (SC34-4121). 

Examine a few useful edit macros to 
find out what they can do. The first macro 
is called Job Card (JC). This macro au- 
tomatically inserts a // JOB card at the 
beginning of the member being edited. 
The macro is shown in Figure |. With 
this macro, you do not have to store JOB 
cards in your ISPF libraries and retrieve 
them with the COPY command. If you 
need a job card for the member you are 
editing, just type JC in the command field 
and the macro creates one for you. 

The next two macros complement one 
another. They are called Truncate For- 
ward (TRF) and Truncate Backward 
(TRB). Assume you are editing a large 
member and you want to delete all the 
data from a certain line onward. The 
“‘longhand’’ way of doing this, of course, 
is to place the cursor in the line command 
area of the first line to be deleted and type 
D99999. With the TRF macro, you can 
simply type TRF on the command line, 
place the cursor on the first line to be 
deleted and press ENTER. Everything 
from the cursor down will be deleted. TRB 
works in a similar way but in the opposite 
direction; it deletes everything from the 
cursor up, that is, toward the beginning 
of the member. These macros are shown 
in Figures 2 and 3. 


The Magic Of Command Tables 


When you want to interrupt a task tem- 
porarily while you do something else, split 
screen is the obvious answer. But what if 
both screens are already active and you 
do not want to terminate either one? Or, 
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what if, for whatever the reason, it just is 
not convenient to use split screen to in- 
terrupt the current task? 

Remember the KEYS command we 
used earlier? It allowed us to interrupt a 
task and return to it later without invoking 
split screen. The command table mecha- 
nism allows you to define your own com- 
mands which can be used in this way. 
Even better, your commands can invoke 
standard ISPF services. Consider the fol- 
lowing examples. 

Assume you need to save a member 
you are editing but in a different dataset. 
It would be ideal if you could split the 
screen, invoke option 3.2 and allocate a 
new dataset. Then you could use the 
CREATE command to save your data in 
the new dataset. But suppose you already 
have the other (split) screen active with 
some unrelated function. You are stuck 
unless you have a command that will sus- 
pend your current edit session, take you 
directly to panel 3.2 and let you return to 
EDIT afterward. 

Figure 4A shows a command table en- 


TRF Macro 
ISREDIT MACRO 
ISREDIT (LINE,COL) = CURSOR 
IF &COL = 000 THEN DO 
SET LINE = 000000 
ISPEXEC VPUT (LINE) SHARED 
SET &ZEDSMSG = &STR(POSITION CURSOR FIRST) 
ISPEXEC SETMSG MSG (ISRZ001) 
EXIT 
END 
ISREDIT (LLINE) = LINENUM .ZLAST 
IF &LINE NE &LLINE THEN — 
ISREDIT DELETE .ZCSR .ZLAST 
ELSE — 
ISREDIT DELETE .ZCSR .ZCSR 
IF &LINE > 1 THEN DO 
SET &LINE = &LINE — 1 
ISREDIT CURSOR = &LINE &COL 
END 
SET &ZEDSMSG = &STR(OK) 
ISPEXEC SETMSG MSG (ISRZ000) 


a Nae: a 


TRB Macro 
ISREDIT MACRO 


ISREDIT (LINE,COL) = CURSOR 
IF &COL = 000 THEN DO 
SET &ZEDSMSG = &STR(POSITION CURSOR FIRST) 
ISPEXEC SETMSG MSG (ISRZ001) 
EXIT 
END 
ISREDIT (LASTLN) = LINENUM .ZLAST 
IF &LINE NE 1 THEN — 
ISREDIT DELETE 1 .ZCSR 
ELSE — 
ISREDIT DELETE 1 1 
IF &LINE < LASTLN THEN DO 
SET &LINE = &LINE + 1 
ISREDIT CURSOR = &LINE &COL 
END 
SET &ZEDSMSG = &STR(OK) 
ISPEXEC SETMSG MSG (ISRZ000) 
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ISPF 


try that will do exactly that. Our com- 
mand is called U32. If your command ta- 
ble contains this entry, then entering U32 
in the command field of any ISPF panel 
will interrupt the current task and display 
panel 3.2. When you finish with panel 
3.2, END (PF3) will return you to the 
previous task and you can resume where 
you left off. 

Another example involves SDSF, a 
product used by many installations for 
viewing completed jobs to decide whether 


Conquer 


TSO/ISPF 


U32 Command 
VERB T ACTION 
U32.  O SELECT PGM(ISRUDA) PARM(ISRUDA2) 


SDSF Command 
VERB T ACTION 
SDSF 2 SELECT PGM(SDSF) PARM(/&ZPARM) 


Get the MAXimum 


Productivity 
with MAX/SPF™ 


MAX/SPF is TSO/ISPF's "best friend". It enhances and expands 
the programmer productivity tools available with TSO/ISPF — 


at a price you can afford. 


e Faster and easier access to your most frequently used datasets and PDSs 
using our unique, customized DATASET NAME LIST 


Consolidates commonly used ISPF/PDF functions into one single, more 


flexible facility 


Edits all VSAM or SAM files in traditional full-screen mode or with the 


COBOL Copybook layout feature 


Fastest, truly interactive search and global editing capabilities 


Increases ISPF/PDF performance 


DON'T waste time! Let MAX/SPF maximize your productivity. 


== Integrity 


Solutions, Inc. 


(303) 794-5505 or 1-800-289-9900 
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hard-copy output should be printed. 

The usual way to access SDSF is via a 
menu option. But SDSF is the kind of tool 
you often need to use while interrupting 
something else. For instance, you have 
just created some JCL and issued the 
SUBMIT command to run it. Since this 
is the first time you have run this partic- 
ular job, you suspect it may contain er- 
rors. So, without leaving EDIT, you would 
like to invoke SDSF, inspect the output, 
leave SDSF and either save your JCL or 
else correct and resubmit it, as appropri- 
ate. The command in Figure 4B will let 
you invoke SDSF from any ISPF screen 
by keying SDSF in the command field. 
When you finish with SDSF, just press 
PF3 as many times as needed to return to 
the screen you invoked SDSF from. 

There are a few mechanical details you 
need to know in order to set up your own 
command tables. 

Command tables are stored in your ISPF 
Table library, which is a partitioned da- 
taset that is allocated to DD name ISP- 
TLIB in your TSO session JCL or logon 
CLIST. A command table is just a mem- 
ber in this library. ISPF imposes a strict 


ISPF 


naming convention for command tables. 
A command table name is of the form 
xCMDS where x is one to four alpha- 
numeric characters. Since the command 
table’s name is also its PDS member 
name, the name must adhere to standard 
PDS member name requirements; that is, 
it must begin with an alphabetic character. 

The characters represented by ‘‘x’”’ 
above are usually ISR; ISRCMDS is the 
command table for most of the built-in 
ISPF functions such as edit and browse. 
However, you will sometimes find that 
optional features such as SDSF have their 
own command tables. If this is the case 
in your installation, check with your local 
systems programmer to determine the 
names of the other command tables in your 
environment. 

Once you have identified the command 
table to be modified, use ISPF option 3.9 
to update it. This is a specialized edit 
function for command tables only. If you 
are accustomed to using ISPF Edit, you 
will find 3.9 pretty straightforward. Refer 
to the HELP tutorial if you get stuck. The 
examples in Figures 4A and 4B depict 
actual command table entries which can 


be keyed in using option 3.9. 
The Double-Digit Utilities 


When you choose option three on the 
ISPF main menu, you are offered a list 
of utility functions. Choices 12,13 and 
14 are recent additions to ISPF which pro- 
vide some much needed functions. Ac- 
tually, these three options all invoke the 
same program but with different param- 
eters. The program is SuperC, a very 
handy utility which has been around for 
some time but which, until recently, was 
used internally within IBM and not made 
available to users. 

The first option is option 3.14, the 
search-for function. When working with 
ISPF libraries, a common requirement is 
the need to search a library for a particular 
character string. For instance, you might 
need to scan a library of JCL to find all 
the places where a particular dataset name 
or DD name is referenced. Option 3.14 
provides this capability, and it is a colos- 
sal time saver. 

When first selected, option 3.14 dis- 
plays a panel on which you can specify 
the library to be searched and the char- 


Unlocking mainframe resources: word processing, 


Why are so many end user reports 
outdated before they re written? 


Timeliness is critical for 
many end user reports. But 
DP cant always drop ongoing 
work to respond quickly to 
report requests. 

Now there's a way out of the 
report support bind: mainframe 
word processing for end users. 

EdWord? is the key. With 
EdWord software, your end 
users will enjoy benefits like 
mail merge, menus, spelling 
correction, easy formatting, 
and online print preview, 


EdWord and ESS are registered trademarks of 
Trax Softworks, Inc 


raat 


ur 


among others. 

Anyone with a 3270 can use 
Ed Word. For real flexibility, use 
EdWord with ESS? the Trax 
spreadsheet package, to inte- 
grate text with financial data. 

Trax is the key. Join the 
more than 500 companies using 
Trax software around the 
world. Contact Tom Cox, 10801 
National Blvd., Los Angeles, 
CA 90064. FAX: (213) 470-2487. 
Telex: 350048. Telephone: 
(213) 475-TRAX. 


; ; Tr eax Softworks, Inc. 


Unlocking end user 
productivity on your 
IBM mainframe. 
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For System/38, AS/400™ ", 43XX, 9370, 30XX Users 


The IPL 6800 Series Turns 
2.3 Gigabytes Of Data 


Into This 


Finally an unattended 

and revolutionary 

storage medium for all @) 
data processing tasks Ls 


from IPL. & a 


IPL's 6800 series of 

tape subsystems boasts 

a sleek, space-saving, 

office environment 

design. These modular, 

rack-mounted subsystems can easily be 
configured to meet your specific 
requirements and connect directly to 
your IBM system. No hardware or 
software alterations necessary. 


But good looks are just the beginning. 
For example, the IPL 6860 performs 
data storage magic . . . using helical scan 
technology to replace 12 or more 
reel-to-reel tapes with one 8mm 
cartridge. You get 2.3 gigabytes of 
storage with no operator intervention, 
and proven reliability thanks to IPL's 
continued commitment to technological 
innovation. 


Cartridges or reel-to-reel. Only IPL lets 
you choose either one . . . or combine 
both to fit your applications precisely. 


Call IPL today at 1-800-338-8ipI, 

in MA (617) 890-6620 and cut your data 
processing tasks down to size with the 
IPL 6860 8mm, 2.3 gigabyte subsystem. 


ipl... ——— 


360 Second Avenue 
Waltham, MA 02154 


IBM and AS/400 are registered trademarks to 
International Business Machines Corporation. 
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acter string to search for. (An option on 
this panel lets you display a secondary 
panel on which up to nine additional 
strings can be specified.) You can search 
an ordinary sequential file, an entire li- 
brary or just specific members. When you 
have keyed in the necessary parameters, 
press ENTER and SuperC will be invoked 
to perform the search. You can also spec- 
ify where the listing containing the search 
results is to be stored. (This listing is dis- 
played in ‘‘browse’’ mode on the terminal 
when the search is complete.) 

This option can get a bit complex, so 
you may need to consult the manual the 
first few times you use it. It is well worth 
the effort! 

Option 3.12 provides an interface to the 
compare feature of SuperC. This lets you 
compare two files or library members to 
determine where and how they differ. Op- 
tion 3.12 is reasonably straightforward to 
use: you specify the library members and/ 
or files to be compared, a listing file which 
is to contain the results and some proc- 
essing options to control such things as 
the type of listing to be produced. You 
can also specify a profile dataset, which 
is a file containing detailed commands to 
control the comparison. This lets you ov- 
erride the defaults to specify some proc- 
essing options, which are sometimes use- 
ful and which cannot be specified on the 
panel. For instance, the profile dataset can 
be used to control whether sequence num- 
ber fields and comment lines are included 
in the comparison. (Profiles can be cre- 
ated with the Activate/Create function of 
option 3.13.) As with 3.14, the manual 
is an indispensable aid in learning to use 
this option. 

Options 3.12 and 3.14 are limited in 
scope — they provide access to a useful 
subset of SuperC functions. Also avail- 
able, however, is option 3.13, which gives 
full access to all of SuperC’s features. 
Option 3.13 gives you more flexibility and 
options when performing search and com- 
pare functions and also offers some ca- 
pabilities which are particularly useful to 
software developers. For instance, given 
two pieces of source code which we will 
call source A and source B, 3.13 can 
compare the two, determine where they 
differ and generate IEBUPDTE control 
statements that will transform source A 
into source B. ' 

It is strongly recommended that you 
gain some practice with 3.12 and 3.14 
before tackling 3.13. A study of the man- 
ual is an absolute must for using this ex- 
tremely powerful tool. 


ISPF 


One final point about these utilities. 
Both 3.12 and 3.13 give you the choice 
of performing the functions under ISPF, 
that is, while you wait, or submitting a 
batch job to run SuperC in background. 


Miscellaneous Time And 
Work Savers 


The LOCATE command is one you 
know well if you have used ISPF for any 
length of time. But this command has a 
handy option you might not be aware of. 

Has this ever happened to you? You are 
editing data with the ISPF editor and you 
enter a C (‘‘copy’’) or M (“‘move’’) line 
command on some data line. For one rea- 
son or another, however, you never type 
an A (‘‘after’’) or B (‘‘before’’) else- 
where in the data to complete the opera- 
tion. Later, when you press PF3, the ed- 
itor displays the message MOVE/COPY 
IS PENDING and refuses to terminate. 
Now you have to locate the line that con- 
tains the uncompleted command so you 
can resolve it. If your data consists of 
several hundred lines (or more), finding 
the offending line can be both annoying 
and time consuming. 

LOCATE to the rescue! If you enter 
LOCATE CMD and press ENTER, the 
editor will find and display the first or 
next line that contains an unresolved com- 
mand. You can then deal with the ‘‘or- 
phan’’ command appropriately and con- 
tinue on your way. 

RETRIEVE is a command which has 
been added to ISPF recently and it is one 
of those ‘‘why-didn’t-they-think-of-this- 
sooner’ jewels. RETRIEVE, which can 
be entered in the command field of any 
ISPF screen, will redisplay the last thing 
entered in the command field. You can 
then press ENTER to re-execute the com- 
mand or, if the command contains an er- 
ror, you can correct it right there and then 
press ENTER. This is a real boon when 
you have just entered a long, complicated 
command which contains an error. Rather 
than key the whole thing in again (and 
maybe commit another error), you can use 
RETRIEVE to bring back the entire com- 
mand so you can correct and retry it. RE- 
TRIEVE is so useful that it is now the 
built-in default setting for PF keys 12 
and 24. 

Option 3.4 is one that experienced ISPF 
users know and love. But this already- 
useful option has been enhanced to pro- 
vide even more flexibility. When the 
screen contains a list of dataset names 
generated by 3.4, you can, of course, type 
action characters next to the displayed 


names to invoke functions such as edit, 
browse, delete and so on. But you are not 
limited to the built-in functions! Option 
3.4 also lets you type the name of a CLIST 
next to the dataset name. The named 
CLIST will then be invoked and the da- 
taset name will be passed to it as a pa- 
rameter. This lets you extend the func- 
tionality of option 3.4 to a degree limited 
only by your creativity in writing CLISTs. 

One installation has written a CLIST 
named ‘‘A’’ (short for ‘‘allocate’’). When 
this CLIST is invoked by typing ‘‘A’’ next 
to a dataset name in a 3.4 list, it executes 
the LISTDSI command of TSO to acquire 
the attributes of the specified dataset. It 
then displays a screen, which is similar 
to the ‘‘allocate’’ screen of option 3.2, 
with the attributes of the specified dataset 
filled in. The user can change the dis- 
played attributes, if desired, by simply 
typing over them. When ENTER is 
pressed, the ALLOCATE command of 
TSO is used to allocate a new dataset us- 
ing the attributes shown on the screen. 

The result of all this is to give the user 
the ability to easily allocate a new data- 
set using a dataset selected from a 3.4 
list as the model. This is just an example 
of the flexibility available when writing 
your own CLISTs to be executed under 
option 3.4. 


Concluding Thoughts 


This article has attempted to highlight 
the enormous power and flexibility avail- 
able to seasoned users of ISPF. It should 
be noted in passing that we have only 
scratched the surface of ISPF’s labor- 
saving potential, especially in the areas 
of edit macros, command tables and 
CLISTs for option 3.4. Recent releases of 
ISPF have added features that let you ex- 
tend the built-in functions to create your 
own unique labor-saving tools. ISPF has 
become such an open architecture that its 
ability to multiply your productivity is 
limited only by your own creativity. = 
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Now You Can Relax... 
CICS/VSAM Data Recovery 
Has Been Automated! 


Data Recovery WAS Stressful 


Traditional methods of data recovery are complex, 

and sometimes they don't work at all. Should data 

loss or corruption occur, you must start with such 
questions as . . . Do we have backups for this 
application, and where are they? What about the 
CICS and batch updates since the last backup? Will we 
have to re-key? Even if all recovery elements are avail- 
able, the process of planning and coordinating a recovery 
is time consuming, prone to errors, and often stressful. 


Integrity Solutions ELIMINATES 


Data Recovery Stress 


Integrity Solutions, Inc. (ISI) has developed a compre- 
hensive family of journal management and data integ- 
rity products to eliminate data recovery stress. Once 
you’ve installed the Integrity Solution, lean back and 
relax. Because you are assured that your CICS and batch 
VSAM data will be recovered quickly and accurately. 


Automated Recovery: ISI’s ICS/MANAGER auto- 
mates your recovery by registering and managing all 
critical backup, journal and recovery information on a 
global Control Dataset. Customized JCL is automatically 
generated and submitted when needed for a recovery to 
save you valuable time and resources. ICS/MANAGER 
may be combined with any or all of ISI’s other products 
to automate the recovery process. 


Online Recovery: ISI offers two alternate online recov- 
ery methodologies. They provide fast and accurate 
FORWARD or BACKWARD recovery between back- 
ups for VSAM files updated by CICS/VS. One is unique 
in providing 24-hour/day availability of VSAM files to 
CICS while the backup process takes place. 


Batch Recovery: ISI provides comprehensive recovery 
for batch environments by transparently journaling 
VSAM updates. Job restart and re-run time is reduced, 
and redundant backups can be eliminated. This helps 
assure that your batch processing is completed on time. 
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Automatic Journal Archiving: You’ll eliminate acci- 
dental overwrites of CICS journals and logs with auto- 
matic journal archiving. In addition, your entire CICS 
job submission process is managed and enhanced with 
numerous extended features. 


All of Integrity Solutions’ products are designed to work 
together to provide system-wide data integrity. How- 
ever, each product may also be purchased separately to 
address your specific requirements. 


And, if you need assistance at any time, our experienced 
technical support staff is at your service, 7 days per 
week, 24 hours per day. 


For more information, or to begin your free, 30-day trial, 
please call 1-800-289-9900 or (303) 794-5505. 


Integrity Solutions, Inc. 
7921 SouthPark Plaza 
Littleton, Colorado 80120 
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If you're looking for a session manager 
that delivers more than multiple sessions, 
look into Menu. It also delivers the mail. 


Every session manager available saves time in logon/ 
logoff procedures. Our VTAM-based MENU goes far 
beyond this. 

With its exclusive, built-in electronic mail feature, 
MENU from DTA lets you send messages to users or 
user mailboxes with incredible speed and ease. So 
memos, notes, requests, confirmations and the like are 
delivered with less paperwork, confusion and delay. And 
there's more. 

MENU from DTA features automatic 3270 screen data 
compression, flexible security and authorization, auto 
logon/logoff, and complete on-line help screens. It also 
has single or multi session capabilities, is easy to install 


and requires low overhead, with 
only 4K per additional session. 
To find out more about the many cost 
and time saving features built into MENU, 
or for a free 30-day trial, give us a ring soon. When it comes 
to effective session management, nobody delivers more. 


Software Products Group 
550 Waterford Park 

505 North Highway 169 
Minneapolis, MN 55441 


800-521-6773/612-591-6100 


DTA SOFTWARE... More 
efficient in every detail. 
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uch of the attention of computer 
operations managers over the 
past few years has been aimed 


at the subject of automating mainframe 
operations. You can read article after ar- 
ticle, attend conference after conference 
and review product after product that is 
aimed at the automated operations mar- 
ket. Before committing yourself and your 
company to the high price of automation 
products and the resources it takes to im- 
plement them, there is much that can be 
done in the direction of eliminating func- 
tions, rather than’ automating them. 

Many of the tasks that are performed 
by operations personnel are non-value 
added in terms of the product or service 
being provided to the customer. Why, 
then, is automating these functions con- 
sidered before their need to be performed 
at all is examined? The automation of a 
task renders it invisible to the organiza- 
tion; nevertheless, it perpetuates the over- 
head (albeit reduced to machine speed) of 
performing that task. Elimination of tasks 
can and should be considered as the first 
phase of any automation strategy. 

Nor is the concept of elimination of 
tasks limited solely to the mainframe con- 
sole area. It can also successfully be ap- 
plied in the areas of magnetic tape oper- 
ations, output media handling, production 
(batch) processing and the Help Desk. 
This article will examine each of these 
areas in turn and will discuss ways to im- 
plement projects aimed at identifying those 
tasks which can be eliminated as a prel- 
ude to implementation of an automation 
program. 


Involve The Supplier 


The console operations area is perhaps 
the richest in terms of the availability of 
products to automate tasks and the num- 
ber of different tasks that can be auto- 
mated. Many IBM data centers have al- 
ready utilized the Message Processing 
Facility of MVS to suppress some of the 
more obvious redundant messages. You 
can suppress a high percentage of mes- 
sages which operators already ignore and 
automate what amounts to a ‘“‘rubber 
stamp’’ response to many console re- 
quests (WTORs and the like). 

As you determine which messages can 
be suppressed or automatically actioned, 
you should be feeding your suppression 
and automatic action lists back to hard- 
ware and software suppliers with a strong 
request that the base product be modified 
to eliminate these messages. Modification 
of the product will not be an overnight 
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By Jeff Murrell 


event and you will no doubt have to pro- 
ceed with interim implementation of 
suppression or action rules through auto- 
mation software. However, only when 
your suppliers begin getting this feedback 
from their customers can you begin to ex- 
pect improvements. 

To analyze console traffic, your system 
logs are an excellent source of informa- 
tion as are your operators themselves. A 
Pareto analysis is a tool used in quality 
improvement programs to identify the next 
logical problem to be addressed. Causes 
of activity are listed in descending order 
of frequency. It will usually be found that 
the top 20 percent of causes generate 80 
percent of the occurrences. Thus, work- 
ing on those more frequent causes will 
yield the more productive result. The 
technique is named after Vilfredo Pareto, 
who identified the principle of the ‘‘vital 
few’’ and the ‘“‘trivial many.’’ Figure | 
demonstrates the use of a Pareto chart in 
analyzing Help Desk activity. 

Create a list of messages for each ap- 
plication, from the most frequent to the 
least. Begin at the top, examining which 
messages are unnecessary, which are au- 
tomatically actionable and which are valid 
alerts requiring human intervention. When 


this exercise is completed, you will have 
an excellent document with which to feed 
your automation product, but more im- 
portantly, one which you can take to your 
supplier with a request for elimination. 

The very number of consoles is another 
area for consideration. Where is it written 
that you must have a separate console for 
each system, each application and in some 
cases, a backup console ‘‘just in case?’’ 
Many automation products already ad- 
dress the capability to integrate the func- 
tions of several consoles into one operator 
workstation. 

Professional workstations offer the op- 
portunity to direct many /ogical consoles 
into one hardware device. Windows may 
be used to allow the operator to access 
many systems or many applications from 
one keyboard and one monitor. Further 
advancement is required to allow a win- 
dow automatically to be activated when 
an alert is sent from the host system or 
application, interrupting whatever is cur- 
rently executing. Without this advance- 
ment, the operator’s role continues to be 
that of actively monitoring multiple host 
environments. However, the advent of 
multi-processing workstations should soon 
facilitate passive monitoring, whereby 
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Pareto Analysis Of Help Desk Calls 


Call type 


Batch job status 

Workstation/terminal hardware problem 
Network access problem 

Security (e.g. lost password) 
Workstation software problem 


Telephone problem 
Request for technical advice 
Other 


Total 


human intervention is only required when 
an alert is signaled. Add to this the ability 
to automatically telephone (or page) a 
support person, plus the ability of that 
person to emulate the operator worksta- 
tion from a remote PC and you have the 
elements of a true lights out or unattended 
operation. 

Console consolidation does not end with 
the mainframe and application monitoring 
functions. The operator workstation should 
also be designed to incorporate access to 
the external environment control system 
(air, water, heat, power), to the data cen- 
ter security (access control) system and to 
channel switches. Most such systems to- 
day run on separate, usually mini- or mi- 
cro-based hosts but are capable of being 
integrated into a single workstation. 


Migrate Small Tape Datasets 
to Disk 


The tape library function is served by 
only a handful of automation products. 
Tape mount activity must certainly be the 
most mundane of operations tasks. As 
such, it is the easiest to consider auto- 
mating and perhaps the least obvious to 
consider eliminating. However, if you 
analyze tape mount activity (via system 
logs), a likely discovery will be that a 
high percentage of mounts result in cre- 
ation of or reference to a dataset that is 
less than 1OMB in size (only five percent 
of the capacity of a single 3480 car- 
tridge). With Direct Access Storage De- 
vice (DASD) technology continuing to re- 
duce the cost per megabyte of on-line 
storage and with the cost of human re- 
sources for tape library services increas- 
ing, it now becomes economically feasi- 
ble to store such datasets on disk. 

If the dataset is accessed frequently 
(once per month or more), you will find 
that the cost of tape storage, mounts and 
processing often exceeds that of DASD. 
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Number 


43024 
37570 
20582 
13881 

4560 


3020 
2252 
7569 


157909 


Even if the dataset is accessed less fre- 
quently, a facility such as IBM’s DFHSM 
will ensure that it is returned to tape at an 
appropriate time. Now, however, you will 
be using the full capacity of a 3480 and 


Professional 
workstations 
offer the 
opportunity 
to direct many 
logical consoles 
into one 


hardware device. 


making the maximum use of each tape 
mount, since many small datasets will be 
archived to the same physical cartridge. 
To execute a project aimed at tape to 
DASD migration will require the involve- 
ment of your application systems groups 
and some special treatment of requests for 
sequential storage space. Tape has the 
characteristic that it is relatively unlimited 
in terms of how much data can be written 
once the dataset has been allocated. You 
can simulate this capacity by dedicating 
a pool of DASD to a new esoteric name 
(OLTAPE, for example). The customer’s 
JCL can be changed to request OLTAPE 
with an indication of the logical record 
length, number of records to be written 


and retention period. Such a modification 
will also position the job for easy mi- 
gration to Systems Managed Storage 
(DFSMS) when that IBM product is fully 
implemented. 

Internal system exits can calculate the 
amount of primary and secondary disk 
space to allocate the dataset. With a pool 
of OLTAPE DASD large enough to ac- 
commodate all tape datasets below the 
10MB limit, the customer should never 
experience an out-of-space abend. Fur- 
ther system modifications can be em- 
ployed to print tailpage warnings when a 
job requesting OLTAPE has exceeded the 
1OMB limit or when a job requesting 
TAPE has written less than LOMB. 

For jobs which read tape datasets, one 
can simply disable the UNIT=TAPE 
interpretation, leaving the system to de- 
termine from the dataset name whether or 
not that dataset now resides on real tape 
or OLTAPE. 

The performance of sequential disk da- 
tasets is measured in milliseconds, rather 
than the minutes it takes to allocate a tape 
unit, obtain a mount and access the data. 
If performance and cycle time improve- 
ment is not sufficient incentive for the 
customer to migrate, pricing can be a fur- 
ther inducement. You should be able to 
price OLTAPE dataset space so as to dem- 
onstrate meaningful cost savings once tape 
storage and mount costs are compared. 


From Less Paper To Paperless 


The output media area is probably the 
most difficult to consider, both in terms 
of automation and elimination. Roll feed 
devices, burster-trimmer-stacker devices 
and advanced function printing all lend 
themselves to automating the manual tasks 
associated with managing the non-impact 
print function. However, in the end there 
are still people required to feed the 
“printing press’’ and to separate, bag and 
distribute the output. The paper culture 
is still alive and well in most corpora- 
tions, so it will not be easy to promote a 
program of elimination. Many tactics 
may nevertheless be employed to reduce 
the load. 

An on-line reporting system is a must. 
Most recipients of paper output have ac- 
cess to a terminal. If the output from their 
application systems is loaded to an on- 
line reporting system, they have imme- 
diate access to their results without the 
delays associated with print output and 
distribution. With appropriate indexing 
capability, keyed, for example, by a de- 
partment number printed in the page 
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headings of the report, on-line reporting 
also allows direct access to the required 
portion of a report. Further, one copy of 
the report may be simultaneously read by 
many “‘recipients’’ from their terminal. 

The implementation of an on-line re- 
porting system may also involve some 
modification in the application systems. 
Reports which were designed for a 132 
column by 66-line medium may require 
redesign for an 80-by-24 medium. The 
additional rows and columns do not need 
to be eliminated, since the on-line re- 
porting system should allow scrolling for 
wide and long pages. However, the report 
might usefully be redesigned so that the 
most needed information is contained in 
the leftmost and uppermost portions of 
each page. Alternatively, the program 
could be altered to key off the medium 
and eject pages after 24, rather than 
66 lines. 

After on-line reporting, the next req- 
uisite is a good report distribution system. 
This system will receive the output of the 
application and will be capable of break- 
ing a complete report into individual, 
smaller reports again keyed by data in the 
page headings. Each smaller report will 
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contain only that information required by 
a particular recipient. The report distri- 
bution system should be driven by a da- 
tabase that knows each smaller report by 
name, who receives that report and 
whether that recipient requires on-line, 
printed or microfiche (one-day optical 
disk?) representation of that report. This 
database should be available to your cus- 
tomer via on-line inquiry, so that modi- 
fication and deletion of requirements is a 
simple task. Again, the cooperation of the 
customer and the application systems 
groups will be required to successfully 
implement these concepts. 

The third approach to print elimination 
will require sensitive management. Each 
recipient of a report needs to be chal- 
lenged as to the ongoing need for the in- 
formation. In many cases, unless the re- 
port distribution system is tied to the 
corporate human resource database, it will 
be discovered that the original recipient 
is no longer in the position held when the 
report was first implemented. Possibly that 
person no longer needs the report in his 
or her new capacity or even no longer 
works for the company. Alternatively, you 
may find that the person who now holds 
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that position no longer requires the infor- 
mation. In many cases it has been easier 
for the new recipient to use the round 
file than to figure out how to cancel the 
report! 

A survey periodically attached to each 
printed report is one way to motivate the 
recipient to reconsider the need. How- 
ever, the survey must be accompanied by 
a simple, on-line means of acting on a 
decision to cancel. Another place to find 
unused reports is in the distribution area 
itself. Reports which are not picked up 
within a week of printing should be can- 
celed via the distribution system. Again, 
if the recipient suddenly realizes some- 
thing is missing, it should be a simple 
matter to reinstate the output via on-line 
access to the distribution system. 


Correct Abends Before 
They Happen 


Production (batch) processing is one 
area that has been well served by auto- 
mation products for some time. Many data 
centers have already implemented library 
management and scheduling systems 
whereby application groups can register, 
validate and schedule job streams to ex- 
ecute at various frequencies without man- 
ual intervention. The area that has not been 
extensively addressed is what happens 
when something goes wrong. An abend 
usually requires that someone be alerted 
to take some action before the job can be 
rerun and further manual action to effect 
the restart. Such activity is usually re- 
quired during second or third shift, which 
automatically extends the recovery cycle 
while the programmer is located (and 
awakened!). Automation of some abend 
recovery is possible. However, a project 
aimed at elimination of the cause of the 
abend will yield longer term benefits, not 
to mention more satisfied customers (and 
fewer bleary-eyed programmers!). 

Start by generating a Pareto chart of the 
most common causes of production abends 
over some time period (several months). 
Begin at the top of the list and identify 
the application or technical support group 
(or supplier) whose product or service 
needs to be modified to eliminate the root 
cause. For example, many application 
systems will abend on finding that the ex- 
pected input dataset is absent or empty. 
Electronic Data Interchange (EDI) appli- 
cations are susceptible to this problem, 
since the external data source may or may 
not have data to transmit on the given day. 
The application could be modified to pro- 
ceed without that particular input, to can- 
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cel itself (without abend) until the next 
run cycle or to reschedule itself later in 
the day, giving more time for input data 
to be accumulated. If the missing dataset 
is simply an error, the scheduling system 
could be modified to verify its existence 
at the time the job is placed on the sched- 
ule (a simple JCL scan is required). Ad- 
vance warning could be provided to the 
application group, during prime time, en- 
abling recovery of the dataset before it 
causes an abend and without that middle- 
of-the-night wake-up call. 

With good monitoring tools, many other 
abends, such as time-outs, database full 
and out-of-space conditions and others can 
be foreseen, corrected and eliminated be- 
fore they become a problem. 


Help The Help Desk 


The Help Desk is perhaps not the most 
obvious area to consider in terms of elim- 
inating a task. Again, though, a Pareto 
analysis of the causes of Help Desk calls 
will yield a list of projects which can be 
undertaken to reduce the workload. Many 
calls may be addressed by placing the 
means to obtain the required product or 
service or to correct the problem in the 
hands of the caller. The banking industry 
has paved the way with its extensive use 
of automated teller machines and touch- 


Ws SRS No other company can automate your 


Take, for example, the caller who wants ea). data center like Altai Softw are. Because at 
to know the status of a batch job submit- | Altai, automation is our single focus. All 
ted some time ago. A simple inquiry can | mr our resources and expertise are devoted to 
be developed that will enable that cus- | P developing the finest data center automa- 
tomer to interrogate the job entry subsys- a tion software in the world. Software that 
tem directly and to receive a response in- ia helps you work faster. Smarter. With more 


dicating whether that job is running and, = accuracy and efficiency. Whether your data 


if not, where it is waiting. center is large or small, MVS or VSE. 
Consider also the caller who simply 


needs information on how to execute an 
on-line inquiry. Why is that information 
not available at the touch of a function 


key? The developer of the inquiry should Pores: ee you'd like to make your data center pr r; 
be encouraged to include context-sensi- Perm Sos call Altai Softw. nn 1)" 
es ae are today at 800/22 


tive help, such that if a given function key 
(Fl according to Systems Application Ar- 
chitecture’s Common User Access stand- 
ards) is depressed, a call is made to dis- 
play the on-line documentation for that 
panel, without losing the contents of the 
original screen. To be even more critical, 
why is any kind of explanation even nec- 
essary? Could the inquiry developer alter 
the panel design so as to include more 
“‘user friendly’’ instructions and selec- 
tion options? In such a way, the need for 
even help functions can be eliminated, 
not to mention the frustrated call to the 
Help Desk. 
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Conclusion 


In all of the functional areas discussed, 
complete elimination of the operator’s 
tasks is difficult, if not impossible to 
achieve, at least today. Some amount of 
console traffic, even if only alerts, will 
require automation and some will con- 
tinue to require operator (human) atten- 
tion. Tape is here to stay for some years 


to come and complete automation is a dif- § 


ficult economic proposition. Printed out- 
put cannot even be automated beyond the 
distribution area and the paperless society 
is for another generation. Some produc- 
tion abends will continue to require inter- 
vention and many Help Desk calls will 
require either automation via a voice re- 
sponse unit or the personal attention of a 
knowledgeable operator. 

Before you spend too much time and 
money automating, however, try to min- 
imize that which needs to be automated. 
At least then you will not be hiding the 
problem and perpetuating the overhead of 
dealing with it. You will also be providing 
a more cost-effective, available and 
higher-quality service to the data center 
customer. 

The object of automation is quality. One 
way to improve service and product qual- 
ity is to attack the number of non-value- 
added tasks that go into providing the 
product or service. This article has at- 
tempted to highlight some of the rela- 
tively simple projects that can be under- 
taken in any data center to minimize the 
number of tasks and to reduce the amount 
(and cost) of automation that must be de- 
ployed. It is hoped that such an approach 
will lead to a much more efficient oper- 
ating environment, a more cost-effective 
utilization of automation technology and 
a more satisfied data center customer. = 
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Find Time For Your 


Expanding 
Role As A 


Database | 


Administrator 


hroughout the evolution of data 
| processing, the role of the database 
administrator has been defined, re- 
fined and dramatically expanded. This area 
of responsibility has followed the trend 
from generalist to specialist like many 
other data processing careers. The days 
of the one-man band are gone and have 
been replaced by a symphony of special- 
ists. Among these is the Database Ad- 
ministrator (DBA). 


Evolution Of The Specialist 


The industry has witnessed a shift of 
the responsibility for database administra- 
tion from the lead programmer to the an- 
alyst to the database specialist. The func- 
tion of database administration may appear 
under a number of titles throughout dif- 
ferent companies, but each is basically the 
same. Titles such as database administra- 
tor, database analyst, database specialist, 
data analyst, data specialist and a whole 
array of others have surfaced throughout 
companies spanning the nation and the 
globe. For simplicity’s sake, these titles 
will be referred to collectively throughout 
the remainder of this article as DBA. 


The Database Expert 


In the early days, a DBA in a large data 
center was most likely to be trained ex- 
tensively in the hierarchical approach to 
database management, namely IBM’s In- 
formation Management System (IMS) and 
Data Language | (DL/1). Even more, the 
DBA’s concentration was centered around 
the logical design and physical imple- 
mentation of the database structure. 

The DBA was the primary contact and 
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expert for all matters concerning the da- 
tabase. The programming staff was merely 
concerned with the DL/I calls to access 
the database and was not concerned with 
the physical organization or structure of 
the database. It was the responsibility of 
the DBA and not the programmer to de- 
termine the most efficient method of re- 
trieving the data needed by the program. 
This responsibility fit neatly into the 


Technology 
and 
time-saving 
tips aid the 
DBA 


structured programming and process-dri- 
ven design methodologies promoted by 
Yourdon, DeMarco and others. 

These new methodologies included de- 
sign and program walkthroughs, a method 
for individuals other than the author to 
review the program design and/or code. 
The DBA held a pro-active role in the 
design phase of a program or set of pro- 
grams. It became a well-known fact that 
a good design and the proper amount of 
work upfront could prevent both logic and 


performance problems in the future. 


Performance And Tuning 


In addition to maintaining the data used 
by these processes, it also became nec- 
essary for personnel to ensure that the level 
of performance of the applications ac- 
cessing the data remained acceptable. As 
the use of interactive systems grew, per- 
formance of the applications became more 
critical than ever. Performance had to be 
measured and analyzed. Both good and 
bad performances had to be recognized. 
The good performance was used as a 
model and the bad one had to be im- 
proved to closer meet the standards set by 
good performance. 

The IMS systems programmer was in- 
itially responsible for all aspects of per- 
formance of the IMS system and the ap- 
plications accessing the IMS system. The 
trend has been to shift the responsibility 
and control of performance of the IMS 
system and its applications to the DBA. 
The IMS systems programmer still usu- 
ally retains the responsibility for the 
MVS tuning considerations that affect 
IMS, but the DBA is now accountable for 
performance and tuning considerations 
within IMS. 


System Maintenance 

As the quantity of the data grew and 
the number of users accessing the data 
multiplied, the number of applications in- 
creased as did the interfaces between the 
applications. Suddenly, maintenance of the 
IMS system became a full-time job. In 
addition to performing the IMS control 
block changes, all changes to the system, 
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Why More Programmers Prefer ProEdit’ 
For DB2 Application Testing. 


The reasons include all of the above, and 
more. Just ask any user. 

Programmers tell us ProEdit’s ISPF-like 
interface speeds all their daily tasks, from 
building a DB2 test environment, to 
manipulating DB2 data, to testing 
SQL application code, and reporting 
on test results. 

It gives them so much function- int 
ality, they’ve made it the industry 
leader for DB2 application testing. In 
fact, ProEdit is installed in more DB2 
shops than any other DB2 product on 
the market. 

And ProEdit continues to set the 
standards for DB2 application testing. 
For example, ProEdit now provides the 
industry’s only DB2 Logical Compare 
Facility. 

This new facility eliminates the tedious 
chore of manually comparing “‘before’’ and 
“after” images of DB2 tables following an 
application test. ProEdit does it automati- 
cally—and displays any differences for you. 


TERNATION 
DB2 USERS GROUP 


A recent user survey revealed ProEdit 
increases DB2 application testing produc- 
tivity by an average of 33%! That’s because 
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application programmer in mind— 
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with a lifetime trade-in guarantee so that the 
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That makes us ‘‘The Safe Buy”’ 

Call today toll-free 800-642-0177 
for details on ProEdit and our full line of 
DB2 products and services. Or write us at 
Two Executive Drive, Fort Lee, NJ 07024. 
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the applications and the databases needed 
to be coordinated and closely controlled. 
The task of modifying the IMS system 
control blocks became less technical and 
more administrative, thus came the switch 
of responsibility for the IMS SYSGEN 
process from the systems programming 
staff to the DBA staff. 

Hardware technology progressed and 
system software development skyrock- 
eted. Suddenly, many new features were 
being added to the IMS system software. 
IBM began to target its clients’ industries 
and introduced functions such as Fast- 
Path, Multiple Systems Coupling and In- 
tersystems Communication. 

These new sophisticated software fea- 
tures required both an understanding of 
how the system software had functioned 
previously and an appreciation for how 
the applications already interfaced with the 
software. The DBA was expected to 
maintain the expertise for these new fea- 
tures in shops where they were used. 

Availability And Recovery 

Companies slowly became dependent 
on data processing for their business op- 
erations. Many employees could remain 
totally unproductive if the system or its 
applications were unavailable. The task 
of recovering from an outage, whether it 
be the database, the application or the 
system, became critical. 

In addition to the client-oriented fea- 
tures of the software, IBM also intro- 
duced features within the IMS system 
software to aid the DBA staff in speeding 
the recovery process, including Database 
Recovery Control (DBRC), DASD log- 
ging, off-line dump formatting and Ex- 
tended Recovery Facility (XRF). It be- 
came a requirement for a DBA to 
understand these features because they are 
crucial in expediting a recovery from an 
outage. 

Together with concerns about the on- 
site recovery process came floods of con- 
cerns about how a company would sur- 
vive if its computer operations became 
unavailable indefinitely, as would be the 
situation after a natural disaster. If a com- 
pany were not prepared, a natural disaster 
could put it out of business. The ability 
to recover from a disaster became a high 
priority item ‘on many corporate strategic 
plans. The DBA plays an integral part in 
every good disaster recovery plan. 

CASE Technology And DB2, 

Front And Center 


The applications development and pro- 
duction implementation cycle stabilized 
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for some time. The bugs in the traditional 
approach had been pretty well worked 
out, but development of new applications 
was demanding on corporate budgets. 
Vendor-developed applications did not 
always foot the bill in terms of a com- 
pany’s operating needs and internal devel- 
opment of applications could not easily 
be cost justified. Thus came the birth of 
Computer Aided Software Engineering 
(CASE). 

Although CASE technology remains in 
its infancy, there are a number of products 
on the market which are being used by 
many companies. The use of analysis and 
design tools, fourth-generation languages 
and application code generators have all 
dramatically changed the way applica- 
tions development is performed and each 
is having a major impact on the respon- 
sibilities of the DBA. 

At the risk of sounding trite, the last 
but definitely not the least contributor to 
the increased responsibility being placed 
on DBAs has been the maturation of the 
relational database technology, namely 
IBM’s DB2. Many DBAs who were for- 
merly the IMS experts are being used to 
support DB2. 

Although IMS can be rated far more 
complex than DB2, DB2 may seem like 
an adventure through an unknown world, 
much like Dorothy and her friends in 
search of the Emerald City. Many of the 
concepts are familiar yet different, the way 
the Tin Man, Lion and Scarecrow were 
familiar yet strangers to Dorothy. The IMS 
DBA may search far and wide for diffi- 
cult and highly technical explanations that 
may be brief and simply explainable 
within DB2. 

Suddenly, the DBA has a multitude of 
responsibilities and roles which must be 
exercised on a daily basis. Some of these 
require more time than others, some re- 
quire a large learning curve and some may 
only be exercised periodically. The DBA 
has become inundated with tasks, a to-do 
list that grows daily, multiple number one 
priority items and less time to spare. 


Taking Advantage Of Technology 


Fortunately, the rapid advances in tech- 
nology are bringing a number of new In- 
formation System Staff products to the 
marketplace. CASE technology is a tre- 
mendous example. Beyond CASE tech- 
nology, there are a number of other prod- 
ucts on the market which will increase 
your productivity and give you greater 
flexibility in satisfying requests and solv- 
ing problems. If you do not have any of 


these products available to you, then you 
should immediately investigate automa- 
tion products. 

Tools which aid you in the design proc- 
ess are a requirement for development of 
applications in this day and age. The old 
flowchart and data flow diagram tem- 
plates should now reside in museums and 
not in your desk. There are too many good 
and cost effective products available for 
both mainframes and personal computers 
for you to be using the old manual draw- 
ing methods. 


CLISTs To The Rescue 

One product that is available in every 
shop having TSO is ISPF Dialog Man- 
agement Services. You should become 
familiar with the product as soon as 
possible. 

ISPF Dialogs are both easy and quick 
to write. They will be your first step to 
automating tasks and functions which you 
consider mundane. Even the most basic 
ISPF Dialog Services will allow you to 
gain great advantages over manual meth- 
ods of completing tasks. 

One basic example would be to create 
an ISPF Dialog that would allow you to 
generate the JCL and control cards nec- 
essary to print or copy some information 
from the IMS Secondary Log Dataset. 
Your JCL will be fairly static except for 
the tape volume serial number and control 
cards. The JCL and control cards may be 
included as skeletons in your ISPF dialog. 

Your dialog could prompt you for input 
or a panel may be displayed to enter your 
input. This input may then be included in 
your JCL and control cards. The com- 
bined information may then be submitted. 
In the future when you need a log print, 
your dialog can be executed. It will be 
faster and more accurate than JCL gen- 
erated manually. 


Real-Time Performance 

Monitoring 

The next type of product that will be 
most beneficial to you as a DBA will be 
a DBMS monitoring and automated op- 
erations product. One of the best and most 
widely-used products for IMS monitoring 
is Boole and Babbage’s (Sunnyvale, CA) 
IMS Monitoring Facility (IMF). 

Initially, this product did not provide 
much in the way of problem determina- 
tion, because it was executed under the 
IMS subsystem. If you needed to inves- 
tigate a slow response problem on IMS, 
the old RTO product experienced the same 
slow response. Since the product execu- 
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tion has been moved to the TSO subsys- 
tem, it has become much more helpful 
and easier to use. 

Release 2.3.1 of IMF introduced the 
ability to split your screen and have a reg- 
ular ISPF session running at the same time 
as your IMF session. This has been the 
greatest improvement to the product since 
its execution has been moved to TSO. Also 
introduced in this release is the time ini- 
tiated EXEC facility that allows a user to 
specify that certain execs be issued at 
given times. 

Time initiated EXEC processing re- 
moved the reliance on master terminal op- 
erators to execute IMS commands at the 
same time daily. For example, you could 
use time initiated EXECS to turn on the 
IMS DC monitor daily from 11:00 to 11:05 
for your performance profile snapshot. 
This could now be accomplished without 
having to rely on the master terminal op- 
erator to remember to turn on and off the 
monitor with the /TRACE command. 


Automated Operations 


The monitoring facilities available 
within IMF help you get a feel for the 
workload being placed on IMS and aid in 
responding to problems. Simply looking 
at a few of the inquiries available on IMF 
can sometimes highlight the problem im- 
mediately. Beyond all of the performance 
and workload monitors is the automated 
operator portion of the product. 

Automated operations will allow you to 
become aware of problems faster and can 
even begin to resolve the problems before 
you are notified. Any IMS or IMF mes- 
sage that is logged to the IMF journal may 
be intercepted and a specified set of ac- 
tions may be taken. This is accomplished 
by including the IMF AUTO-OPERA- 
TOR exit in the link of the IMS nucleus. 
When a message is issued, the exit tries 
to schedule an IMF EXEC with the same 
name as the message ID. 

IMF EXECs are similar to ISPF dia- 
logs. In fact, most commands which may 
be executed from an ISPF dialog may be 
issued in your IMF EXEC. In addition, 
EXECs can be written to issue either IMF 
or IMS commands which may help you 
in resolving problems. 

Suppose you are having a problem with 
a shortage of PSB WORK pool, but you 
are unsure of how much to increase the 
pool. You can set up a monitor using IMF 
to track the number of scheduling failures 
by type intent. Once the number of sched- 
uling failures surpasses a specified max- 
imum, a warning message will be issued 
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by IMF. You can write an exec to inter- 
cept the warning message, turn on the 
DC monitor and /DISPLAY the active 
regions. 

Once the warning condition has cleared, 
IMF will issue an informational message. 
You could also write an exec, identified 
by the informational message ID, to turn 
off the DC monitor and submit a job 
to print the EXCEPTION report through 
IMS ASAP. 

The exception report would then tell 
you specifically which PSB was failing 
and how much space the PSB required 
from the PSB Work Pool. You can check 
your PSB Work Pool utilization at the time 
and determine the high water mark for the 
pool. You could then increase the pool by 
the size calculated as follows: high water 
mark + size required for the failing PSB 
= current pool size. 

Once you are familiar with the way the 
automated operator EXECs work, the 
possibilities are unlimited. Other exam- 
ples would include: restarting IMS trans- 
actions and programs after an application 
abend; starting extra message regions 
when the message queues become in- 
flated; and DBRing a database when the 
EXTEND limit has been reached. 


Dynamic Modification Of The 
On-Line System 


In addition to automating some opera- 
tion functions, it is important that you have 
some software allowing you flexible and 
dynamic modification of application-re- 
lated IMS control blocks. There are a 
couple of products which will accomplish 
just that. 

One such product is BMC Software’s 
(Sugar Land, TX) DELTA IMS. DELTA 
allows the user to dynamically alter con- 
trol blocks being used by IMS. Changes 
to the SYSGEN application information 
may be made dynamically and immedi- 
ately. This will allow you to complete the 
work request faster and more effectively 
because it will no longer be required that 
you wait for an IMS SYSGEN to be 
scheduled and completed. 

Beyond modification of the IMS con- 
trol blocks, DELTA provides utilities to 
create IMS Stage | source from a list of 
DELTA commands which you generated 
using the product. This can save a great 
deal of time and errors when creating 
the source input to the IMS SYSGEN 
process. 


Time-Saving Tips 


Technology has helped us do our jobs 


more efficiently, but there are some fun- 
damental time management tips which will 
complement these technological improve- 
ments. Getting organized is the key to 
successful time management for any oc- 
cupation and, as a DBA, successful time 
management is critical if superior quality 
of work and above average performance 
is to be maintained. 

Learning to save time and getting the 
most productive use of your time will cre- 
ate a greater variety of tasks, increase your 
visibility throughout the organization and 
open the gates of opportunity to you. 
There are several time-saving tips and each 
is mentioned specifically with a brief ex- 
planation. 


Track Your Tasks And Activities 


A complete master to-do list is essen- 
tial. This list will be an ever-changing list 
of items requiring action. Items will be 
deleted and added as tasks are completed 
and initiated. This list can be a summary 
of past, current and future tasks. It pro- 
vides a clear picture of progress and di- 
rection. It may include both long-term and 
fill-in type activities. This master list 
should correspond directly to a set of files 
or items within the files. 

The following three sets of files should 
exist in your filing system in some form: 
open — consisting of projects and tasks 
which are currently in work; closed — 
consisting of projects or tasks which have 
been completed, including all follow-up 
activity; and future — consisting of back- 
logged projects or tasks which will be 
completed sometime in the future. 

These files should be reviewed weekly 
to ensure that each file remains in the ap- 
propriate group and that each of them is 
still in progress. Completed open files 
should be moved to the closed files and 
open files put on hold should be moved 
to the future files. Future files with work 
that needs to begin should be moved to 
the open files and future files with work 
that has been reassigned or canceled 
should be removed from the future files. 


Program And Status 

These three sets of files will provide a 
good reference source when drafting a 
status report. Each closed file, which con- 
tains a completed project or task, may be 
listed as an accomplished item. Future files 
which have been put on hold may be listed 
as waiting for input or supervisor action 
required. Open files may be listed as items 
with work in progress. 

Simply reviewing your files should al- 
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low you to report status more completely 
and faster than trying to remember back 
over the last two weeks or month. Once 
the completed files have made their way 
on to a status report, the contents should 
be distributed into your regular filing sys- 
tem for future reference. 

Even if these three sets of files exist 
only as stacks of paper on the corner of 
your desk, they should be easily access- 
ible and you should always be familiar 
with their contents. This part of your fil- 
ing system may seem a bit cumbersome 
at first, but once you are familiar with the 
way to use it, it should help you organize 
your work considerably. 


The Telephone, Friend Or Foe? 


Phone calls can mean the death of your 
time schedule if they are not handled 
properly. If you let it, the phone can be 
the greatest single contributor to time loss. 

How many times have you started a 
long-term task, only to be interrupted by 
the phone. Then you have to restart the 
task from the beginning, possibly several 
times. Much of that time could have been 
saved if you will follow these few sug- 
gestions. 

Every phone call should be logged im- 
mediately. A piece of scrap paper, such 
as the back page of an old SYSOUT, could 
serve as a log sheet. 


Typical Phone Call Reaction 


As the caller begins to speak, write the 
date, time and the caller’s name and num- 
ber at the top of the log sheet followed 
by a brief description of the problem or 
inquiry. Next, determine if the request can 
be satisfied quickly and determine the 
priority of the request. 

If it can be satisfied quickly and the 
priority is high (that is, production is being 
affected), then a response should be given 
to the caller immediately and a brief de- 
scription of the response should be writ- 
ten on the bottom of the log sheet. The 
log sheet may then be placed in the stack 
of closed files. 

If the request will require little time but 
the priority is low and you are busy on 
another task, tell the caller you will return 
the call at a specified time. This way the 
caller knows that you are not putting him/ 
her off indefinitely. 

If you are going to get back to the caller, 
then note the date and time that you will 
call back on the log sheet. Then place the 
log sheet with the open files and schedule 
time for the task. 

If the caller cannot wait, say you will 
need to research the answer before calling 
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back. Write the word now on the log sheet 
and place it at the top of your open files. 
As soon as you come to a break point in 
your current task, complete the caller’s 
request, write the brief description on the 
bottom of the log sheet, return the call 
and place the log sheet in your closed stack 
of files. 

If the request cannot be satisfied 
quickly, the priority is low and you are 
busy on another task, explain that you are 
busy and that the request will be placed 
in your work request queue. Determine 
the date and time when you can satisfy 
the request and note this on the log sheet. 
Inform the caller of this date and time, 
place the log sheet with your open files 
and continue with your current tasks. 


Control Your Telephone 


The most important consideration is 
do not let your phone control your sched- 
ule. It is also important to remember not 
to let the sequence of calls or the tone 
of the caller’s voice determine your task 
priorities. 

You will not be able to avoid interrup- 
tions totally, but if you apply this method 
you will certainly be able to cut down on 
the number of interruptions. 

If you are working on a critical task 
and you are being interrupted continu- 
ously, it may be wise to isolate yourself 
away from your regular work area. Make 
sure that your secretary or someone knows 
where you are and that you are only to be 
interrupted in case of an emergency. This 
will buy the time that you need to work 
on your critical task. 


The Time Schedule 


Scheduling your time is probably the 
most crucial of the time management 
techniques. If you do not have a road map 
to use as a guide for what you should be 
doing and when you should be doing it, 
you are likely to find yourself running in 
several directions, fighting multiple fires 
and going home at the end of the day 
wondering what you have accomplished. 

Your time schedule should be com- 
pleted on a weekly basis. Friday after- 
noon is usually a good time to plot next 
week’s activities. Certain time blocks will 
remain consistent with the same task from 
week to week, like morning mail, pre- 
vious night’s follow-up and lunch. You 
may consider placing these fixed items 
permanently into your pattern schedule. 


Draft Your Time Schedule 


When scheduling your time, first de- 
termine the high priority items and items 
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which will require a significant amount of 
your time. Your priorities should be de- 
termined and agreed upon by you and your 
supervisor. Be sure that both of you agree 
which tasks should be completed ahead 
of others and when tasks are due to be 
completed. This will avoid miscommun- 
ications at a later date and give you a start 
on scheduling your time. Block out the 
times for meetings which have been 
scheduled for the next week. Next, de- 
termine the largest blocks of time that are 
most likely to be free of interruptions. 

For example, Tuesday afternoon may 
be more likely to be free of interruptions 
than Monday morning. Finally, write in 
the blocks of time for the tasks with the 
highest priority and most significant 
amounts of time. 

When scheduling your time, be sure to 
include free blocks of time for unexpected 
activities. Unexpected activities will al- 
ways occur. They may vary in length of 
time required to complete, but they will 
occur. Planning for the unplanned can be 
challenging. However, after a few weeks 
of completing time schedules, you will 
have a much better feel for how much 
time you should allow for unplanned ac- 
tivities. 

Polish Your Technique 

If you are consistently spending too 
much time on unplanned activities, then 
perhaps better planning for projects or ac- 
tivities is needed by you or by others with 
whom you interact. 

A chart of major activities and their 
suggested proportions of time as a per- 
centage of the whole is shown in Figure 
1. You will notice that about 25 percent 
of your time should be designated as free 
time for unplanned activities. 

In addition, give yourself at least four 
hours a week for research- and develop- 
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ment-type activities; this will give you a 
break from routine activities and will help 
ensure that you and your tasks are pro- 
gressively moving forward with time. 

Figure 2 shows an example of a com- 
pleted time schedule for the week of 3/ 
17/89. You will notice that Morning Mail 
and Follow-Up Activity are scheduled 
daily from 8:00-9:30. Lunch is scheduled 
daily from 12:00 to 12:30. These are fixed 
activities and appear on the schedule every 
week. When this schedule was com- 
pleted, four meetings were scheduled for 
the week. The times for these meetings 
were blocked out first. 

The tasks in progress, or open tasks, at 
the time were: Install Data Dictionary Re- 
lease 6.0, Develop IMF 2.5 Operator 
Training and IMS Performance Monitor- 
ing. Blocks of time for these activities 
were scheduled after the meeting times 
were blocked out. 

Free time for unplanned activities was 
scheduled along with the time for open 
activities. Fill-in activities for the week 
were listed under the Notes section. If at 
some point throughout the week you do 
not have tasks to complete during a free 
block, you can use this time for the fill- 
in activities or for continuing on your open 
task list. 


Keep Meetings Productive 

Much of your time schedule can be ex- 
hausted and many hours wasted by sitting 
idly in meetings. Avoid unproductive 
meetings. It is important to develop a skill 
for being able to determine if your pres- 
ence at a meeting is required and neces- 
sary. Your invitation to a meeting could 
be for informational purposes or it could 
be directed to anyone with your expertise 
on a specific subject. 

If you determine that your invitation is 
for informational purposes only, you can 
call the requestor of the meeting, inform 
him/her of your absence and request that 
a copy of the meeting notes be forwarded 
to you. If you determine that someone 
with your expertise is required, determine 
if you are the proper recipient of the in- 
vitation. 

Even if your presence is required, be 
aware that at some point you will have to 
miss a meeting. If you have to miss a 
meeting and it is possible, send someone 
in your place. If it is not possible to send 
someone in your place, then contact the 
requestor, inform him/her of your ab- 
sence and request that a copy of any notes 
or questions from the meeting be for- 
warded to you. 
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fllw | testing sysgen 
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Thursday mail | IMS Develop Schedule OPS 
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fllw plan Operator Session 
up meet Training w/o 4/10/89 
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+ Verify Space Utilization 
+ Review Prod IMS scheduling 
* Investigate RECON maintenance 
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(415) 326-0681 


Stanford Bookstore 
Palo Alto 
135 University Avenue 
Palo Alto, CA 94301 
(415) 327-3680 


Stacey's Bookstore 

581 Market Street 

San Francisco, CA 94105 
(415) 421-4687 

FAX (415) 777-5017 


Computer Literacy 
Bookshop 
2590 N. First Street 
San Jose, CA 95131 
(408) 435-1118 
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Stanford Bookstore 
Stanford, CA 94305 
(415) 329-1217 


Computer Literacy Bookshop 
520 Lawrence Expressway 
Sunnyvale, CA 94086 

(408) 730-9955 


B. Dalton Bookseller 

123 Del Amo Fashion Square 
3525 Carson Street 

Torrance, CA 90503 


COLORADO 


Auraria Book Center 

955 Lawrence Street 

Denver, CO 80204 
(303) 571-0265 


United TechBook Company 
249 Main Street 
Longmont, CO 80501 

(303) 651-3184 

(800) 247-4808 


DISTRICT OF COLUMBIA 


Reiter's Scientific and 
Professional Bookstore 
2021 K Street N.W. 
Washington, DC 20006 
(202) 223-3327 


FLORIDA 


Walden Software 
Merritt Square Mall 
777 E. Merritt Island Causeway 
Merritt Island, FL 32952 
(407) 454-9004 


Bookstop 
7710 N. Kendall, Suite B1 
Miami, FL 33156 

(305) 598-7292 


Walden Software 

Palm Beach Mall 

1801 Palm Beach Lakes Boulevard 

West Palm Beach, FL 33401 
(407) 686-4564 


KENTUCKY 


Kennedy Book Store, Inc. 

405 South Limestone 

Lexington, KY 40508 
(606) 252-0331 


MASSACHUSETTS 


Boston University Bookstore 
660 Beacon Street 
Boston, MA 02215 

(617) 236-7415 


B. Dalton Bookseller 
South Shore Plaza 
Braintree, MA 02184 


Softpro 

112 Burlington Mall Road 

Burlington, MA 01803 
(617) 273-2919 


M.LT. COOP at Kendall Square 
3 Cambridge Center 
Cambridge, MA 02142 
(617) 491-4230 
FAX (617) 621-0856 


Quantum Books 
1 Kendall Square—Building 400 
Cambridge, MA 02139 

(617) 494-5042 


/ 


B. Dalton Bookseller 
Framingham Mall 

Route 30 & Cochituate Road 
Framingham, MA 01701 


NEW JERSEY 


McGraw-Hill Bookstore 
Hightstown-Princeton Road S-1 
Hightstown, NJ 08520 

(609) 426-5749 


Princeton University Store 
36 University Place 
Princeton, NJ 08540 

(609) 921-8500 


NEW YORK 


Walden Software 
Hudson Valley Mall 
1300 Ulster Avenue 
Kingston, NY 12401 
(914) 336-7121 


Barnes & Noble 
105 Fifth Avenue 
New York, NY 10003 


Classic Bookshops 
1212 Avenue of the Americas 
New York, NY 10020 

(212) 221-2252 


Classic Bookshops 
133 World Trade Center 
Concourse 
New York, NY 10048 
(212) 466-0668 


by Bradley Dyck Kliewer 


McGraw-Hill Bookstore 
1221 Avenue of the Americas 
New York, NY 10020 

(212) 512-4100 


Waldenbooks 

57 Broadway 

New York, NY 10006 
(212) 269-1139 


Walden Software 

Poughkeepsie Galleria 

Route 9 and Cottam Hill Road 

Poughkeepsie, NY 12601 
(914) 298-9031 


Total Information Inc. 
844 Dewey Avenue 
Rochester, NY 14613 
(716) 254-0621 
FAX (716) 254-0153 
(800) 876-4636 


OHIO 


Walden Software 
Rolling Acres Mall 
2400 Romig Road 
Akron, OH 44320 
(216) 745-4476 


University Bookstore 

University of Cincinnati 

Cincinnati, OH 45621 
(513) 556-1292 


Your Computer Series Publisher 
McGraw-Hill Publishing Company 


OREGON 


Powell's Technical Bookstore 
32 N.W. Eleventh Street 
Portland, OR 97209 

(503) 228-3906 

(800) 225-6911 


TEXAS 


Bookstop 
6406 N. Interregional 
Highway, #1400 
Austin, TX 78752 
(512) 453-7297 


PRNT Bookshop 
at INFOMART 
1950 Stemmons Freeway 
Dallas, TX 75207 
(214) 746-3625 


Taylor's Technical Books 
Preston Wood Creek 
5455 Belt Line Road 
Dallas, TX 75240 

(214) 239TECH 


Bookstop 
820 Preston Forest 
Shopping Center 
Dallas, TX 75230 
(214) 363-5744 


Professional & Reference Division 


AVAILABLE NOW AT THESE FINE STORES 


Brown Book Shop 
1715 San Jacinto 
Houston, TX 77002 
(713) 652-3937 
FAX (713) 652-1514 


Bookstop 

2922 South Shepherd 

Houston, TX 77098 
(713) 529-2345 


Bookstop 

9985 1-10 West 

San Antonio, TX 78230 
(512) 697-0588 


WASHINGTON 


University Bookstore 
4326 University Way N.E 
Seattle, WA 98105 

(206) 634-3400 


WISCONSIN 


Harry W. Schwartz Bookshop 
209 East Wisconsin Avenue 
Milwaukee, WI 53202 

(414) 274-6400 
Outside Milwaukee 

(800) 552-READ 
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Standardize Your Note Taking 


During meetings that you do attend, it 
is important to take adequate notes. De- 
velop a systematic approach for taking 
meeting notes, including a personal dic- 
tionary of abbreviations, acronyms and 
symbols which have a specific meaning 
to you. 

Symbols can be used as a standard 
method for highlighting your notes. The 
use of a standard set of symbols for high- 
lighting your notes will make review- 
ing your meeting notes faster and more 
effective. 

The same symbol should always be used 
for sections of notes that require action 
on your part. For example, ‘= = > Copy 
T from P,all AC dbs’, where = = > des- 
ignates action on your part. Other sym- 
bols can be used for sections of notes such 
as informational items and action items 
for others. 

Items requiring your action should be 
clearly defined and understood by all at- 
tendees of the meeting. These items should 
also include a specific completion date. 
This is crucial for prioritizing your tasks 
and scheduling your time. 

During the meeting, do not be afraid to 
voice new or different ideas. Opposing 
opinions may exist, but sometimes the best 
ideas are born out of dissent. 

It is important to express your ideas 
and opinions during the meeting. This will 
keep the meeting productive and ensure 
that decisions reached during a meeting 
live to be enforced by the attendees of the 
meeting. Finaly, find out if and when a 
follow-up meeting is scheduled so you 
may add the requirement to your time 
schedule. 

After the meeting, review your notes 
immediately and transfer your action items 
to your master to-do list and file your notes 
appropriately. Your notes may be filed with 
an existing open file or a new file may 
need to be opened. If necessary, prioritize 
and schedule time for your action items 
from the meeting and, if required, sched- 
ule your time for the follow-up meeting. 


DBA-Specific Tips And Ideas 


Although these ideas may be applied 
by professionals other than the DBA, they 
are instrumental in saving time for the 
DBA because of the multitude of different 
tasks which could be executed on any 
given day. There are a few other sugges- 
tions which may be applied specifically to 
your responsibilities as a DBA. 

Floating atop the sea of knowledge are 
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a few manuals which you will find your- 
self referencing repeatedly. If it is possi- 
ble, obtain your own personal copy of 
these manuals. At the minimum, you 
should have your own copy of the mes- 
sages and codes manuals for the products 
which you support. 

Having your own copy of a manual 
means that you can add side margin notes 
of your own to the manual text. Many 
times the text contained in an IBM man- 
ual can be vague and nondescript. Having 
your own notes in addition to the manual 
text will lead to faster problem determi- 
nation when a problem repeats itself. In 
addition to problem determination notes, 
it will be helpful to note other manual 
references directly next to the text. 


Contacts — Invaluable 

Resources 

As a DBA, it is imperative that you 
develop your contacts, both inside and 
outside of the company. This can be ac- 
complished by attending user group 
meetings and conferences. The techni- 
cal exchange of information that takes 
place at conferences such as GUIDE is 
invaluable. 


Once you have started to develop your 
list of contacts, you will find yourself 
making that informal call to get the out- 
side opinion when you may seem at a to- 
tal loss. Never reinvent the wheel. Your 
time is much too valuable to repeat tasks 
which have already been completed by 
someone else. Having a list of contacts 
both inside and outside the company will 
provide you with a reference source if you 
have the suspicion that something has been 
done before. 


Kill Two Birds 


Similar tasks or tasks that would com- 
plement each other should be combined 
if possible. For example, if you have new 
software to be tested and you have some- 
one screaming for an isolated develop- 
ment environment, you could satisfy the 
request and have someone test the new 
software without ever knowing it. The old 
adage of ‘“‘killing two birds with one 
stone’’ should be applied as much and as 
often as possible. 

Multitasking should be applied by 
yourself much the same way as it is ap- 
plied by the machine. If you have some 

See DBA page 50 


With the optimum DB/DC integration technology of ADABAS 5, 
you can increase your computer’s CPU performance by as much 
as 33%! And that not only makes sense—it makes dollars. 


ty softwRRE AG 


37% RETURN 


ON INVESTMENT! 


PROGRAMMING BUSINESS SUCCESS 


For a free copy of an audited benchmark report on ADABAS 5 performance, call toll-free: 
1-800-843-9534. ADABAS is a registered trademark of Software AG. © 1989 Software AG. 
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MVS/ESA 


Architecture, Modeling 
And Performance 


he MVS/ESA operating system ar- 
chitecture has opened new hori- 


zons for systems designers and users 
through the ability to eliminate perform- 
ance bottlenecks experienced in previous 
versions of MVS. Architecture providing 
dataspaces, hiperspaces, enhanced use of 
expanded storage and the potential for 
significant elimination of I/O for subsys- 
tems has provided a new set of problems 
in the performance and capacity planning 
arenas. This article addresses implemen- 
tation and use of the new architecture and 
techniques for modeling the new archi- 
tecture for both performance and capac- 
ity planning projections. Control over 
creation of dataspaces, hiperspaces and 
use of data windowing will be presented 
from both an architecture and perform- 
ance view. 

The MVS operating system continues 
to see expansion and implementation of 
new software technology. In many cases, 
new software technology is provided to 
optimize the use of existing hardware 
technology or alleviate constraints and 
processing deficiencies in the current soft- 
ware technology. In other cases, new soft- 
ware technology is available only because 
new hardware technology is available or 
new hardware technology cannot be uti- 
lized to its fullest potential with existing 
software. 

With the availability of expanded stor- 
age on the 3090 processor complex, a new 
hardware technology was available for al- 
leviating the existing performance prob- 
lems encountered through use of auxiliary 
storage as a paging and swapping mech- 
anism. The concept of “‘processor storage 
swap’’ was expanded beyond its original 
implementation through the logical swap- 
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ping process. This second level mecha- 
nism for paging and swapping reduced the 
amount of time required to transfer pages 
to and from central storage from milli- 
seconds to microseconds. While not op- 
erating at the speed with which logically 
swapped users can be reactivated, ex- 
panded storage provided a significantly 
faster alternative to the use of auxiliary 
storage while freeing a critical resource: 
central storage. 

Use of virtual storage and Virtual Stor- 
age Constraint Relief (VSCR) is still a 
major area of concern for many installa- 
tions. The size of operating system sub- 
systems as well as application system ad- 
dress spaces continues to increase as 
additional function is provided. The re- 
quirement for storage and retrieval of vast 
amounts of data and the ability to con- 
sume large amounts of storage for buff- 
ering of data files and databases has in- 
creased with the transactions volumes and 
processing required in today’s large in- 
stallations. Processing delays due to I/O 
access requirements, “‘I/O drag’’ and the 
need to reduce or eliminate I/O operations 
where possible has only been available 
through the use of large virtual buffer 
areas within the user address space. Even 
with the availability of the MVS/XA oper- 
ating system and 31-bit addressing, the 
VSCR and I/O elimination problems are 
still with us. 

Availability of the MVS/ESA and the 
ESA/370 architecture is providing a di- 
rection for exploitation of the hardware 
architecture to resolve many of the exist- 
ing problems with large storage require- 
ments and I/O access delays. I will 
review some of the software implemen- 
tations in the MVS/ESA operating system 


architecture and discuss both performance 
implications and approaches to using an- 
alytic modeling to predict the effects of 
conversion to the MVS/ESA operating 
system environment. Also, I will briefly 
review the Advanced Address Space Fa- 
cility (AASF) and hardware architecture 
that support implementation of the new 
MVS/ESA facilities (see Figure 1). 


Data-In-Virtual 


The Data-In-Virtual (DIV) facility was 
introduced in the MVS/XA operating sys- 
tem environment as the first implemen- 
tation of what we shall term the ‘‘proc- 
essor storage data’’ technology. 

Based on the implementation of the 
Virtual Storage Access Method (VSAM), 
DIV was implemented as a 4K, block ad- 
dressable architecture contained in a spe- 
cial type of VSAM dataset defined /inear. 
Processing routines were available to ac- 
cess linear datasets through the definition 
of a virtual storage window and either As- 
sembler language macros or subroutines 
to be called from high-level languages. 
The user of a DIV dataset could provide 
a virtual window large enough to hold only 
a few 4K blocks of data from the dataset 
or the entire dataset in storage. 

The VSAM access method was the first 
to exploit MVS/XA 31-bit addressing and 
use of virtual storage above the 16MB 
line. The use of Local Shared Resource 
(LSR) buffer pools, which allows opti- 
mum use of VSAM shared buffers for 
multiple VSAM files, considerably re- 
duced the requirements for virtual storage 
necessary for data buffering. 

Virtual buffering requires real storage 
frames for backing and can create system 
paging problems. The amount of virtual 
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PPA ae ere 1 
ESA/370 Directions 


MVS/SP Version 3 


Dataspaces i 


Hiperspace 


Large Virtual Buffering 


Disabled Reference Storage 


© Objectives 
-Virtual Storage Constraint Relief(VSCR) 
-I/O avoidance and elimination 
-Advantageous use of larger memories-ES 


storage available below the 16MB line was 
also a limiting factor. Use of virtual stor- 
age above the 16MB line eliminated the 
latter and, though the amount of virtual 
storage for a single LSR pool is limited 
to 16MB, the user can define multiple 
16MB LSR pools. You will see that 
VSAM linear datasets are the basis for 
much of future subsystems elimination of 
I/O and performance improvements. 


ESA/370 Architecture 


Three new facilities are available in 
the MVS/ESA operating system imple- 
mentation and ESA/370 architecture. 
These facilities are termed dataspaces, 
hiperspaces and large virtual buffering. 
Each of these new facilities involve use 
of the AASF and the new cross-memory 
addressing capability of the ESA/370 ar- 
chitecture. 


Dataspaces 

A dataspace can be described as an 
MVS address space that did not quite make 
it. The dataspace is created in much the 
same manner as an address space without 
the system areas normally found in the 
address space (LPA, COMMON, private 
area). The dataspace thus provides the user 
two gigabytes of addressable virtual stor- 
age. The dataspace also lacks several of 
the other attributes of a normal address 
space (see Figure 2). 

The first of these is dispatchability. The 
dataspace is owned by the creating ad- 
dress space but does not have an Address 
Space Identification (ASID). The data- 
space is identified and referenced by both 
an eight character, unique name and an 
eight character unique token. Where AS- 
IDs are reused as address spaces come 
and go during normal processing, a da- 
taspace token is unique from system IPL 
to system IPL and not reused. The lack 
of dispatching capability disallows the ex- 
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ecution of program modules in the datas- 
pace. Information stored in the dataspace 
can-be in many forms including execut- 
able load modules, but executable load 
modules must be transferred to an address 
space to execute. 

Two limitations are placed upon datas- 
pace creation. The first is the total number 
of dataspaces that can be active in the 
MVS/ESA system at any given time. This 
limit is set at 8192 and cannot be changed 
by the user. The second limitation is the 
number of concurrent dataspaces owned 
by an address space. The current limit is 
256 of which zero, one and two are re- 
served for MVS/ESA use. A user can thus 
create 253 unique dataspaces. Exceptions 
to this limit and controls are discussed 
later in this article in the section titled, 
Dataspace And Hiperspace Controls. 

Though dataspace virtual storage size 
must be defined in 4K blocks, the 4K 
blocks of storage in a dataspace are byte- 
addressable. The user can move data be- 
tween the address space and a dataspace 
or between dataspaces with standard Move 
Character (MVC) instructions. 

Dataspaces come in three flavors: sin- 
gle, shared and Disabled Reference 


ONLY ONE DBMS CAN 
PROVIDE TEXT AND DATA 
INTEGRATION, DISTRIBUTED 


PROCESSING, INTEGRATED 


DB/DC TECHNOLOGY, 
KNOWLEDGE BASE SUPPORT, 
AND OPTIMUM PERFORMANCE. 


1. ADABAS 5 


5 


FTES OE 


Dataspaces 


AR7+GPR7 
AR6+GPR6 
ARS+GPRS 


Private 
Area 
Application 


Address 
Space 


@ Advanced Address Space Facility(AASF) 
® Private or shared - 2GB storage 
© Not dispatchable-storage fencing 
applies-PWSS=parameter 
@ IEFUSI limit-256 dataspaces 
IMB per DS 
@ Access-AR mode required 
© Must LAM appropriate ALE into AR 


GPR, no AR 


(DREF). The last is a special case re- 
served for authorized users. Dataspaces 
can reside in virtual storage with real stor- 
age backing, on expanded storage pages 
or on auxiliary storage. The most com- 
monly used dataspace will be the single 
dataspace, created by a user address space 
for storage and retrieval of data. The da- 
taspace will assume the characteristics of 
the creating address space and the real 
storage frames backing the virtual storage 
allocation in the dataspace will become 


SOFWARE AG 


PROGRAMMING BUSINESS SUCCESS 


For a free copy of an audited benchmark report on ADABAS 5 performance, call toll-free: 
1-800-843-9534. ADABAS is a registered trademark of Software AG. © 1989 Software AG. 
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part of the task working set. If the cre- 
ating address space is swappable, the da- 
taspace and its pages are swapped along 
with the address space. If storage fencing 
is utilized for the address space’s per- 
formance group, the fencing (PWSS=) 
parameter applies to pages in both the ad- 
dress space and the dataspace. 

The shared dataspace can only be cre- 
ated by authorized users. Data in a shared 
dataspace is available to any address space 
in the system through the dataspace token 
and the facility for acquiring access to the 
token. A primary consideration for data- 
spaces created as shared is that the cre- 
ating address space be non-swappable. As 
discussed previously, if the address space 
is swapped out of storage, any dataspaces 
created by the address space go with it. 
Obviously, this would not work very well 
for shared dataspaces. 

A significant trait of shared dataspaces 
is the lack of threads for access. Unless 
segments of storage in the dataspace are 
storage protected by the creating address 
space or serialized through the use of 
memory enqueue, an address space has 
immediate access to the data. This elim- 
inates much of the queuing due to lack of 
threads seen in many data access and da- 
tabase implementations. 


Evaluation 
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Now Supports More Data Sources 


MXG® Software — a comprehensive package backed by the power of the 
SAS® System. MXG Software contains more than 900 SAS programs that 
evaluate your raw performance data whether created by MVS, MVS/XA‘* 
MVS/ESA™ VM/SP, VM/XA" or VSE operating systems and subsystems 
The programs create SAS data sets that can be displayed as simple list- 
ings or as colorful graphics. MXG Software executes under any supported 
version of the SAS System and now supports the following data sources: 


ACF2. AIM. BDT. Cache DASD Reporter. CA 
Dispatch, COM-PLETE. CICS CMF Monitor 
CINCOM Supra, CMF-RMF, DASD VTOCs 
DASD VVDSs, DASDMON, DB2™ DB2 Trace 
DFSORT, DISOSS. DIV. DL’!, DOS’ VSE 
OSPRINT, Epilog CL1000, EXD. Explore’ VM 
FACOM, GTF DB2. Hogan, ICF. IDMS/RS 
IMS Log, IMF-C/IMS. JES2, JES3, LAND 
MARK. MODEL 204 MVS. MVS,’ SP™ 

MVS XA, MVS ESA, NETSPY, NetView! 
NGA. NPDA. NPM. NS Channel Extension 
PDLF, PDSMAN, SP, POWER, PR/SM™ RACF 
RMDS. RMF, ROSCOE® RSCS. SAM. SAR 
SAS. SAVRS, SMF, SAMON, Spool Transfer 
STC 4400s, SOL/DS™ STOPX37. SyncSort© 
SYSLOG, TSO, TSO/MON, TOP SECRET 
TPX, Trending, VPS, VSAM. VS/1. VTAM 
VM SP. Account. VM/SP/ Monitor, VM XA 
ACCT, VM/XA/ Monitor, VSE, WYLBUR 


MVS/ESA 


The Disabled Reference (DREF) data- 
space is also limited to authorized users. 
DREF dataspaces can reside in virtual 
storage (with real storage backing) or ex- 
panded storage but not on auxiliary stor- 
age. The Expanded Storage Table Entry 
(ESTE) for expanded storage frames 
backing DREF dataspace pages are 
marked such that the Real Storage Man- 
ager (RSM) migration routines will not 
migrate them to auxiliary storage. 

Why DREF dataspaces? Some MVS 
management routines execute in disabled 
states. This prevents them from taking a 
page fault where the page may reside on 
auxiliary storage. Prior to MVS/ESA, this 
required page fixing of the pages used by 
these routines, with much of the page fix- 
ing below the 16MB line due to the page 
involvement with I/O processing. Deple- 
tion of real storage frames below the 
16MB line creates significant problems as 
the number of active address spaces in- 
creases and can result in swap-in failures 
for address spaces. Resolution of page 
faults from expanded storage eliminates 
much of the requirement for fixed pages 
and particularly fixed pages below the 
16MB line. Again we see new architec- 
ture making more efficient use of existing 
technology. 


MXG*— Your Complete Package for Computer Performance 


MXG Guide and MXG Supplement show you how to use the SAS System 
for efficient computer performance management. The MXG Guide includes 
chapters on accounting, benchmarking, capacity measurement, establishing 
the CPE organization, and more. The MXG Supplement contains informa- 
tion on new data sources supported by MXG Software as well as tutorial 


sections 
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MXG Support Subscription includes technical newsletters, software 
updates, enhancements, and technical support on a yearly basis. You'll find 
it an invaluable part of the MXG package because it helps you handle com- 
plex changes in raw data format, length, and content made by operating 
systems and subsystems. 


The MXG package was designed by H. W. “Barry” Merrill, Ph.D., president 
of Merrill Consultants, Dallas, TX. Each part of the package can be pur- 
chased separately. The software and documentation are published and sold 
by SAS Institute Inc. Information on purchase of the support subscription 
offered by Merrill Consultants is mailed with the software. For a free bro- 
chure or to place your order, call the Institute at (919) 467-8000 and ask 


SAS !s a registered trademark of SAS Institute Inc. MXG Is a registered trademark of Merrill Consul 
tants. DB2. MVS’XA. MVS, ESA. MVS/SP. NetView. PR/SM, SOL/DS, and VM/XA are trademarks 
of IBM Corporation IDMS/R is a registered trademark of Cullinet Software, Inc. MODEL 204 is a 
registered trademark of Computer Corporation of America. ROSCOE is a registered trademark of 
Applied Data Research, Inc. SyncSort is a registered trademark of SyncSort Inc. TSO/MON Is a 
product of Morino Associates. Inc. Copyright © 1989 by SAS Institute Inc. Printed in the USA 


SAS Institute Inc 
SAS Circle 
Cary, NC 27512-8000 


Accessing Dataspaces 


Data manipulation for dataspaces and 
MVS cross-memory access in general is 
significantly improved in MVS/ESA. Prior 
to MVS/ESA, cross-memory access was 
accomplished by either scheduling rou- 
tines to execute in the target address space 
and store or return data or through an 
elaborate schema of chaining and special 
instructions to establish and use MVS 
cross-memory services. 

With the expected increase of cross- 
memory services use with dataspaces, 
either of the above methods would not be 
practical due to the processing overhead. 
With MVS/ESA, a special set of hard- 
ware registers, termed Access Registers 
(ARs), are available. There are 16 ARs 
which correspond to the 16 General Pur- 
pose Registers (GPRs) that are the basis 
of S/370 hardware architecture. A task 
can now operate in two modes in the 
MVS/ESA environment: standard and AR- 
MODE. In standard mode, data move- 
ment is controlled only by the contents of 
the GPRs. 

In access mode, a combination of the 
GPR and its corresponding AR is used to 
determine data movement. If the GPRs’ 
corresponding AR contains a dataspace 
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token, data movement is between the ad- 
dress space and the dataspace. If two 
GPRs are involved in data movement and 
their corresponding ARs contain datas- 
pace tokens, then movement of data oc- 
curs between the two dataspaces identi- 
fied by the tokens in the ARs. 

Switching between standard and access 
mode requires a single executable instruc- 
tion. The task may also operate in both 
modes in either 24-bit or 31-bit address- 
ing mode. It is intuitive that the simpli- 
fication of cross-memory access through 
new hardware will provide a significant 
reduction in the overhead associated with 
MVS cross-memory services in concert 
with performance improvements for ac- 
cessing large amounts of processor stor- 
age data. A complete discussion of the 
access mode of operation in MVS/ESA is 
beyond the scope of this article. 


Hiperspaces 


The second major innovation in the 
MVS/ESA architecture is the exploitation 
of expanded storage through the hiper- 
space facility. Hiperspaces are a deriva- 
tive of dataspaces and are created through 
additional options of the DSPSERV As- 
sembler macro, the same macro used to 
create dataspaces. Here, most of the sim- 
ilarities to dataspaces end. 

Hiperspace pages reside either in ex- 
panded storage or on auxiliary storage but 
never in central storage. Hiperspaces are 
defined as one of two types: cache or 
scrollable. Cache type hiperspaces are 
available only to authorized tasks and are 
used to retain 4K blocks of data from per- 
manent (DASD resident) data objects. 

Data in a cache type hiperspace is not 
guaranteed and must have a permanent 
DASD source. Though primarily non-mi- 
gratable (CASTOUT = NO option on the 
DSPSERV dataspace and hiperspace cre- 
ation macro), if available expanded stor- 
age frames are depleted to a critical state, 
pages in cache type hiperspaces will be 
migrated. If the creating address space is 
swappable, pages in the cache type hi- 
perspace will be swapped when the ad- 
dress space is swapped. 

Scrollable hiperspaces can be created 
by any task, reside in expanded storage 
and can be migrated. The primary differ- 
ences in dataspaces and hiperspaces lie in 
addressability and read/write functions. 
Pages in hiperspaces are not byte address- 
able. The pages are moved to and from 
expanded storage in 4K blocks and are 
only byte addressable once they reside in 
the address space of the requesting task. 
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Reading and writing of hiperspace pages 
does not rely on the use of access regis- 
ters. Scroll type hiperspaces have guar- 
anteed data since the only copy of the data 
may reside in the hiperspace. 

Special facilities available through the 
CREAD and CWRITE macros for cache 
type hiperspaces and the SREAD and 
SWRITE macros for scrollable type hi- 
perspaces provide for the transfer of pages 
to and from hiperspaces. The macros are 
available for Assembler level programs. 
The primary use of hiperspaces will be 
I/O elimination as seen in the discussion 
of I/O processing. 


Data Windowing 


Data windowing provides callable sub- 
routine interfaces for high-level lan- 
guages such as COBOL, PL/I and FOR- 
TRAN. The subroutine calls provide 
access to temporary or permanent data 
objects in both dataspaces and _hiper- 
spaces. The callable subroutines provide 
seven basic functions for manipulation of 
data in dataspaces and scrollable hiper- 
spaces: 

* CSRIDAC - identify and access a 

linear object 


* CSRVIEW - establish view of an 
object 
* CSRSORT - capture current view 
via scrollout 
* CSRSAVE - commit changes to 
permanent object 
¢ CSRREFR - refresh current and 
scrolled view 
* CSRIDAC - end options 
* CSRVIEW - termination processing. 
It should be noted that the new data 
windowing facility deals with VSAM lin- 
ear data objects and is built around the 
initial DIV facilities available in MVS/ 
XA. Taking advantage of both the datas- 
pace and hiperspace facilities from high- 
level languages in applications develop- 
ment will require that both the designer 
and, more importantly, the programmer 
have a complete understanding of the DIV 
processing concept and capability. Taking 
advantage of dataspaces and hiperspaces 
for other than DIV processing will require 
Assembler-level knowledge and program- 
ming. Future high-level language capa- 
bilities may be expanded to allow for cre- 
ation and access of dataspaces and 
hiperspaces via direct subroutine calls or 
better yet, an EXEC level precompile verb 
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structure such as the CICS/VS command 
level and the DB2 SQL structures cur- 
rently available. 

I/O Processing 

Elimination of I/O through dataspaces 
and hiperspaces is currently confined to 
the use of VSAM linear objects or DIV 
data objects as they are commonly re- 
ferred. At MAP time (the linear data ob- 
ject equivalent of OPEN for a non-linear 
dataset), the Access Control Block (ACB) 
for the linear object can specify that I/O 
for the linear object or more specifically 
buffering, will be directed to a dataspace 
or hiperspace. The specific dataspace or 
hiperspace is determined by the token 
supplied in the ACB at MAP time. 

Standard access methods, such as 
VSAM and QSAM, do not provide direct 
I/O to and from dataspaces and _hiper- 
spaces. The user may acquire I/O buffer 
areas in a dataspace or hiperspace via the 
DSPSERV macro’s DEFINE and IOON 
options. Data buffers are brought into the 
address space and the task must then move 
the buffers to the dataspace or hiperspace. 
Use of the data in buffers residing in a 
dataspace or hiperspace require that the 
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data be read back into the address space. 

Another option available to the user for 
data buffering on non-linear objects to da- 
taspaces or hiperspaces is the use of a 
user-written MVS IOS interface routine. 
Most users will find this an unacceptable 
approach. 


Large Virtual Buffering 


Standard VSAM _ datasets can be 
mapped directly to hiperspaces through the 
Local Shared Resource (LSR) buffer pool 
facility. This capability requires the DFP 
Release 3.1 product and will be avail- 
able only to authorized tasks. LSR proc- 
essing requires construction of a buffer 
pool via the Build Virtual Resource Pool 
(BLDVRP) Assembler macro. Currently, 
LSR buffer pools built with the BLDVRP 
Assembler macro are constructed in the 
address space above the 16MB line (see 
Figure 3). 

The BLDVRP macro has the capability 
of being provided the token of the hi- 
perspace in which the LSR pool will be 
constructed. When the VSAM dataset is 
opened for processing, data buffers are 
directed to and, subsequently retrieved, 
from the LSR buffer pool built in the hi- 
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perspace. Again, this capability is cur- 
rently limited to authorized tasks. Initial 
users of this capability will be CICS/VS 
Release 2.1 and IMS/VS Release 2.2. Use 
of the facility will be at the user’s option 
through normal generation facilities. 


Library Lookaside 

The Library Lookaside (LLA) facility 
is an expansion of the linklist lookaside 
capability introduced with MVS/XA. 
While the facility was confined to only 
linklist libraries in MVS/XA, the LLA 
implementation in MVS/ESA will allow 
for directory management of any type 
of partitioned dataset. Performance en- 
hancement through the elimination of di- 
rectory searches and faster retrieval of data 
will result from use of LLA. The negative 
to LLA can be the amount of real storage 
required by the LLA address space as the 
number of library directories it is required 


to manage increases. Careful selection of 


LLA managed libraries will be a concern 
for all installations (see Figure 4). 


Virtual Library Facility 

The Virtual Library Facility (VLF) will 
operate as an independent address space 
for storing named data objects in the VLF 
address space as well as a server for stor- 
age and retrieval services to subsystem 
dataspaces. 

Data objects range from executable load 
modules to TSO CLISTs or any other data 
for which quick access is required. Load 
modules cannot be executed in the VLF 
address space or a VLF managed data- 
space but must first be transferred to the 
requesting address space. The availability 
of TSO/E Release 2.1 provides for com- 
piled CLISTs and the REXX language 
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under TSO. Compiled REXX EXECs will 
also be candidates for VLF management. 

The amount of data object storage and 
the effects upon real storage frame avail- 
ability and system paging rates will be the 
main concern for most installations. From 
the overall system perspective, VLF pro- 
vides the most immediate facility for 
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I/O elimination for datasets used by the 
citizens. 

Additional Dataspace And 

Hiperspace Use 

Additional uses of dataspaces will be 
seen with the DFP Release 3.1 product. 
Use of a dataspace by the MVS catalog 
address space will provide for storage of 
a large number of catalog entries in proc- 
essor storage and elimination of the I/O 
delays for catalog record search and re- 
trieval. The catalog dataspace will be 
managed by VLF acting as a server for 
the catalog management address space (see 
Figure 5). 

Job Entry Subsystems (JES) will utilize 
dataspaces to store data that is frequently 
referenced or provide storage for facilities 
that require a large number of entries. The 
JES2 subsystem will utilize a dataspace 
for Internal Reader (INTRDR) processing 
and to allow the user the capability of 
defining a larger number of active internal 
readers. The JES2 dataspace will also as- 
sist in providing System Managed Stor- 
age (SMS) compatibility where sharing 
systems are composed of both MVS/ESA 
and MVS/XA operating systems. 
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The JES3 subsystem will utilize the 
dataspace capability for Job Control Table 
(JCT) storage which eliminates much of 
the need for I/O to the JESQ datasets for 
storing and retrieving the status of active 
jobs in the system. The JES3 dataspace 
will also be used to provide SMS support 
in the MVS/ESA operating environment. 

A major user of hiperspace capability 
will be the Database 2 (DB2) subsystem 
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in the Release 2.1 version. The DB2 con- 
trol datasets (commonly referenced as 
SYSIBM.) are VSAM linear datasets. 
Thus, the placement of catalog and other 
information from these datasets in data- 
spaces, but more likely cache type hi- 
perspaces will be easily accomplished 
through standard DIV mapping. This 
mapping to cache-type hiperspaces could 
eliminate most of the I/O to these linear 
datasets required for support of DB2 user 
requests, database access and database 
storage management. 

Significant improvements in DB2 re- 
quest processing performance will be seen 
with the majority of retrieval for these 
datasets coming from cache-type hiper- 
spaces. The downside will be the amount 
of expanded storage required to hold the 
data from these datasets. Reduction in ex- 
panded storage frame availability will re- 
sult in less space for paging and swap- 
ping, more paging and swapping being 
directed to auxiliary storage and higher 
page migration rates and activity. 

What are the potential future uses of 
dataspaces? An initial consideration would 
be the use of a dataspace for MVS control 
block and data storage that is normally 
available in the Common System Area 
(CSA). This would reduce the virtual 
storage requirements below the 16MB line 
and potentially provide for larger user 
private areas. Though Extended CSA 
(ECSA) is available above the 16MB line, 
many tasks requiring access to the data 
do not operate in 31-bit mode. The major 
drawback to a CSA dataspace is the lack 
of task execution capability in a data- 
space. The current architecture allows for 
the placement of executable code in the 
CSA or ECSA (both in an address space). 
Only data objects that were not executa- 
ble tasks or code could be placed in a 
CSA dataspace. This could present some 
difficult management logic for determin- 
ing placement and location of data with 
CSA, ECSA and a CSA dataspace. 

A second option would be the use of a 
JES dataspace for spooling purposes. 
Small print datasets, particularly of the 
type normally used in the TSO environ- 
ment, could be directed to JES spool da- 
taspaces and subsequently retrieved using 
the ISPF 3.8 screen option as an example. 
The chaining of JES spool buffers on aux- 
iliary spool datasets via the track-record 
number (TTRN) reference could be re- 
placed with virtual page address chaining 
within the dataspace. Directing print to a 
dataspace spool facility could be at the 
user’s option or automatic if the number 
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of print lines generated was below a spec- 
ified threshold. 

A third option would be the use of da- 
taspace(s) as a temporary storage area for 
SMF records. A major concern in SMF 
recording has been the increase in the 
subsystems now writing information to 
SMF and the amount of SMF data MVS 
has to handle. This is a particular concern 
when synchronization of SMF data with 
other subsystem data, such as RMF in- 
terval data, is addressed. A dataspace 
could be used as an intermediate storage 
area for the SMF writer with the transfer 
of the SMF records to the SMF datasets 
on auxiliary storage operating as an asyn- 
chronous function. 

Theoretically, this would pose a delay 
of only a few minutes before the SMF 
records were written to auxiliary storage 
and available for processing. 

As the MVS/ESA operating system 
continues to evolve, you will expect to 
see more subsystems and user-developed 
application systems take advantage of the 
capabilities of the new technology. The 
major impact will be central and ex- 
panded storage requirements and devel- 
oping strategies for controlling the use of 
the dataspace and hiperspace technology. 


Control Of Dataspaces 
And Hiperspaces 


Control of dataspace and hiperspace 
creation will be an integral part of system 
memory management in most installa- 
tions. As presented previously, the cur- 
rent limit for dataspace and hiperspace 
creation is 256 (combined dataspaces and 
hiperspaces) for non-authorized address 
spaces. The actual number available is 253 
since MVS/ESA uses zero, one and two 
for its own purposes. 

Real storage frame backing is not re- 
quired for virtual storage in a dataspace 
until the storage is actually used. A user 
could create 253 dataspaces and not pro- 
vide a significant impact upon system real 
storage frame availability until the ad- 
dressable space in the dataspace is ac- 
tually used. This apparently is not true for 
hiperspaces. 

Creation of a hiperspace, whether cache 
or scrollable, apparently does not allocate 
the expanded storage frames until the page 
is actually used. Even with this tech- 
nique, hiperspace allocation can have a 
significant impact on the performance of 
other tasks in the system due to the de- 
pletion of frames available for paging and 
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swapping. Extensive creation of DREF 
dataspaces whose pages are backed by 
expanded storage and not migratable as 
well as cache-type hiperspaces with the 
CASTOUT=NO option could rapidly 
deplete the available expanded storage 
frames. Fortunately, the latter two’s cre- 
ation are confined to authorized address 
spaces. Scrollable hiperspaces can be cre- 
ated by any address space. Herein lies a 
problem. If a non-authorized user decides 
to create and use 100 hiperspaces at the 
default allocation of IMB, chaos could 
result with paging and swapping opera- 
tions as well as migration activity. 

The number and size of dataspaces and 
hiperspaces can be controlled through 
the standard SMF User Step Initiation 
(IEFUSI) exit. No default IEFUSI exit is 
provided with the MVS system. The de- 
fault storage size for dataspaces and hi- 
perspaces is 938 4K blocks or 956K of 
addressable storage. Upon entry to the 
IEFUSI exit, a three-word parameter list 
is available. 

The first word contains the default size 
allocation for a dataspace or hiperspace. 
The second word contains the maximum 
combined sizes for all user key 8-F da- 
taspaces and hiperspaces with the default 
set at 256MB. The third word contains 
the maximum number of user key 8-F da- 
taspaces and hiperspaces that can be cre- 
ated by a single user with the default set 
at 256. Note that the restrictions apply to 
user key 8-F address spaces and not to 
authorized or key 0-7 address spaces. 

Most installations may want to con- 
sider lowering the default number of data- 
spaces and hiperspaces to the four or five 
range (this would allow one or two da- 
taspaces or hiperspaces for creation by a 
non-authorized address space). This will 
limit the amount of real storage a non- 
authorized user may consume with data- 
space allocations as well as limiting the 
number of expanded storage frames con- 
sumed by a non-authorized user for hiper- 
spaces. 


Modeling And Performance 


A primary consideration in planning for 
MVS/ESA and modeling to project the 
impact of MVS/ESA migration is the ef- 
fect on central and expanded storage. As 
with all new releases of the MVS oper- 
ating system, new function is imple- 
mented. New function means increases in 
module sizes as well as increases in the 
number of modules in the operating sys- 
tem. The storage and data areas to support 
the new function implementation require 
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real and expanded storage backing and in 
the case of real storage, some long-term 
fixing of storage pages. Initial review in- 
dicates that the base MVS/ESA operating 
system requires approximately 2.5 to 3 
megabytes of additional real storage. 

Address space resident set sizes also 
increase in MVS/ESA. The additional 
pages are apparently required to support 
the underlying control block structures for 
new functions such as dataspaces and hi- 
perspaces. Measurement data indicates 
that MVS/ESA address space resident set 
sizes are 28K to 40K larger. This repre- 
sents an increase of seven to 10 pages per 
address space. For planning purposes, it 
is recommended that the 40K or 10-page 
increase in resident set size be used. 

The initial implementation of LLA and 
VLF supporting LINKLST libraries has 
shown varied working set sizes based on 
the number and size of the libraries in- 
cluded in the LINKLST definition. The 
average across several installations has 
shown approximately 1.2 to 1.5MB res- 
ident sets for LLA and 4.0 to 4.5MB res- 
ident sets for VLE. With the expansion of 
the LLA and VLF facilities to support non- 
LINKLST directories and datasets, these 
resident set sizes will obviously increase. 

The use of DIV will increase both real 
storage requirements and expanded stor- 
age frame usage. An intuitive guideline 
for expected increases in the number of 
frames required has been approximately 
40 percent of the total size in bytes of the 
dataset directory. The 40 percent could 
also be applied to the size in bytes of a 
dataset containing data objects to be 
loaded into storage and managed by the 
VLF facility. This will obviously depend 
upon the number of named objects from 
datasets included in the VLF manage- 
ment list. 

Large virtual buffering and the use of 
VSAM LSR buffer pools will affect the 
number of expanded storage frames re- 
quired to support the buffer pools. The 
amount of storage used can be controlled 
by the user through the buffer pool con- 
struction facilities. The user should be 
cautious with the size of LSR pools start- 
ing with smaller pools and increasing the 
size of the pools where measurement data 
indicates that an increase should not have 
an adverse effect on system paging or ex- 
panded storage migration rates. 

Modeling the effects of MVS/ESA re- 
quires increases or changes in the mem- 
ory usage characteristics of tasks active 
during the modeled period and in some 
cases, altering the amount of I/O ex- 


pected when new facilities such as data- 
spaces or hiperspaces are used. The initial 
adjustment is to the amount of system 
storage utilized by MVS/ESA. As stated 
above, the intuitive increase is approxi- 
mately 2.5 to 3.0MB. 

The initial increase in workload resi- 
dent set sizes should be 40K or 10 pages 
in the model. This increase should indi- 
cate if the currently available real storage 
size of the system will be adversely af- 
fected by changing to the MVS/ESA op- 
erating system environment. 

Dataspaces and hiperspaces are a little 
more subjective. If a dataspace is a single 
user type dataspace (TYPE=SINGLE), 
then the resident set size of the owning 
workload should be increased by an ex- 
pected real storage usage, possibly in the 
20 percent to 40 percent range of the 
amount of virtual storage allocation in the 
dataspace. Why increase the average res- 
ident set size for the workload? For 
TYPE=SINGLE dataspaces, it would be 
wise to assume that the tasks in the work- 
load are of like type and that each will 
create its own dataspace. Thus, each ac- 
tive task in the workload would incur the 
additional real storage frame require- 
ments in support of its dataspace. For 
TYPE=ALL dataspaces that will be 
shared by multiple subsystems and ad- 
dress spaces, the increase in real storage 
frames requirements need only be repre- 
sented once. This can be accomplished by 
increasing the amount of system storage 
by a value for the expected number of 
real storage frames required to back the 
dataspace. 

For hiperspaces, either cache or scroll- 
able, the model should be changed to re- 
duce the number of available expanded 
storage frames by the expected number of 
frames required to support the hiperspace. 
For cache type hiperspaces and VSAM 
LSR pools, the reduction in the number 
of available expanded storage frames is 
directed by the size of the cache space or 
the number and size of each LSR pool 
created. For scrollable hiperspaces, the 
reduction in available expanded storage 
frames will be determined by the number 
of tasks expected to create scrollable 
hiperspaces and the average size, in 
frames, of the hiperspaces created. 

Results of making the above described 
changes to a base MVS/XA model and 
the effects on workload response times 
and system paging rates are shown in 
Tables | and 2. 

Table 1 shows the effects of additional 
memory requirements for MVS/ESA and 
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MVS/ESA Memory Effect Evaluation 


DASD Page-in Rate 
DASD Page-Out Rate 
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3090-600E 
128MB Central Storage 
256MB Expanded Storage 


expected effects of upgrade to a 3090- 
6008S processor and the addition of either 
central or expanded storage. The base 
machine for the BEST/1 model is a 3090- 
600E with 128MB of central storage and 
256MB of expanded storage. The config- 
uration is operating with MVS/XA Re- 
lease 2.2. The first column shows the ef- 
fect of the increase in central storage 
requirements for the base MVS/ESA sys- 
tem. We are using a 3MB increase which 
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may be slightly on the high side. To date, 
this author has seen this number range 
from 1.5MB to 3MB. 

The second column shows the effect of 
the increase in active address space resi- 
dent set size. We used a value of 40K or 
10 pages as the increase value. Recent 
information indicates that the increase may 
be as much as 50K or approximately 13 
pages per active address space. 

Note the significant increases in all page 
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transfers with the resident set size in- 
crease. The fourth column shows the ex- 
pected increase in all page transfers by 
the addition of 4MB of named objects in 
the VLF address space. At the point the 
additional memory increases have been 
added to the base system, the 3090-600E 
is totally saturated. 

The next column illustrates the ex- 
pected effect on page transfer activity from 
the upgrade of the 3090-600E to a 3090- 
600S. Note the page rates drop signifi- 
cantly with the upgrade to the 3090-600S. 
This can be attributed to faster completion 
of transactions, particularly non-trivial 
TSO transactions, which results in a 
shorter frame residency time. Storage 
frames are released and returned to the 
free queue at a faster rate resulting in 
fewer page faults and demand paging 
operations. 

The next column illustrates the effect 
of increasing the TSOA workload’s trans- 
action arrival rate by 12,000 transactions 
per hour (the equivalent of adding 230 
TSO users to the processor complex). At 
this point, the 3090-600S processor is 
totally saturated due to the significant 
increase in page transfer rates for all 
categories. 

The last two columns show the pre- 
dicted effect of adding 128MB of central 
storage to the processor or adding 128MB 
of expanded storage to the processor. We 
note that though the demand paging and 
swapping increases with the addition of 
expanded storage are not dramatic, the 
predicted transfer rates for pages to and 
from expanded storage are extremely high. 
The rate of transfer of pages to and from 
expanded storage shown in the last col- 
umn would exceed the guideline of five 
percent utilization of the processor com- 
plex for page transfer. 

Table 2 illustrates the expected effect 
on workload response times from the var- 
ious upgrade scenarios. We note the ’*’s 
in the column where the TSOA transac- 
tion arrival rate was increased to 12,000 
per hour after the upgrade to the 3090- 
600S processor. The last two columns il- 
lustrate the expected effect on workload 
response times from each of the memory 
upgrade scenarios. 

The trivial TSO response times are not 
dramatically affected by the 3090S up- 
grade or the addition of central or ex- 
panded storage. This is due to the lack of 
contribution to response time of both 
processor resources and paging. The pri- 
mary benefactors of both the 3090S up- 
grade and the memory additions are the 
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DBA from page 37 


long batch jobs to run and some paper- 
work to complete, submit the jobs early 
in the morning and then start completing 
your paperwork. 

Submitting your long-running work at 
the beginning of the day will increase the 
chances of successfully completing it by 
the end of the day even if you encounter 
problems. Single threading your tasks will 
cause many time delays and will leave 
you wondering what you accomplished at 
the end of the day. 


Avoid Repetition 


If you find yourself repeating the same 
task numerous times, then that task is 


MVS/ESA Response Time Evaluation 
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non-trivial TSO workloads. The primary 
contribution to response times for these 
workloads is processor and paging, par- 
ticularly for fourth- and fifth-period users. 
With either memory upgrade, the increase 
in transaction arrival rate for TSOA sat- 
urates the processor. We see that in this 
situation, the central storage upgrade 
would be the better option from a total 
TSO response time perspective. 

A final word. In representing I/O re- 
ductions expected from use of dataspaces 
and hiperspaces in the model, the analyst 
should be conservative. Additional meas- 
urement and analysis is required to ascer- 
tain the effects of page frame availability 
on the I/O patterns of the various types 
of datasets. It may be some time before 
a base of information is available from 
which reasonable guidelines for expected 
I/O reductions can be developed. 

Many of the subsystem releases that will 
take advantage of the new MVS/ESA 
capabilities will not be available until 
late 1989. Their effects upon storage re- 
quirements, performance improvements 
and I/O reduction will require more 
knowledge and hands-on experience to 
determine reasonable modeling attributes. 


Summary 


MVS/ESA will provide multiple op- 
portunities for enhancing performance in 
the large systems environment. The major 
arena to be addressed by most installa- 
tions will be central and expanded storage 
sizes and additional subsystems and ap- 
plication systems to take advantage of 
dataspaces, hiperspaces and the large vir- 
tual buffering options. 

Establishing effective controls on the 
creation of dataspaces and hiperspaces will 
be critical to system performance. Most 
installations will begin using the SMF step 
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initiation (IEFUSI) for the first time to 
limit both the number of dataspaces and 
hiperspaces created as well as the mem- 
ory size for creation. 

Large virtual buffering for CICS/VS, 
IMS/VS and other authorized tasks will 
experience decision points on whether to 
direct the LSR pools to dataspaces or 
hiperspaces, the size of the pools and the 
possible increase in paging and migra- 
tions rates compared to the performance 
gains received through reduction in I/O 
processing. 

Additional RMF enhancements, avail- 
able in Releases 4.1.0 and 4.1.1, will 
provide some of the necessary measure- 
ments on page residency and page move- 
ment from use of the new MVS/ESA fa- 
cilities. Though some enhancements are 
available in SMF, very little additional in- 
formation is available on page movement 
at the task level. Performance and ca- 


pacity projections for MVS/ESA will be 
pretty much the same as for MVS/XA 
with the major difference being project- 
ing memory requirements for new func- 
tion usage. = 
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probably a good candidate for automa- 
tion. Too often, business operations within 
a corporation are automated, but the data 
processing activities remain static and 
manual. Tasks such as generating forms 
and memos, database space calculations 
and implementing application mainte- 
nance should all be automated. 

Some may fear being automated right 
out of a job. This is unfounded and un- 
true. Automating tasks which you repeat 
will allow you to complete the tasks faster 
and free up your time for other tasks. Au- 
tomation leads naturally into the final sub- 
ject of this article. 


Summary 


Remember it is important to complete 
tasks faster while not sacrificing quality 
which in turn allows more free time. 
Completing tasks slowly or withholding 
information will not promote job security. 

No one is indispensible. There will al- 
ways be someone who will come along 
to pick up the ball and run with it once 
you have dropped it. Making yourself in- 
valuable is not as good an idea as it may 
seem on the surface. 

At first it may seem that making your- 
self invaluable will promote job security. 
However, if you look past that initial re- 
action, you will find that making yourself 
invaluable in your current position will 
only ensure that you are not allowed to 
leave that position to do bigger and better 
things. = 
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OS/2 


Database Manager 


ith some 5000 estimated licen- 
ses, DB2 dominates the main- 
frame database market in the 


same way CICS rules the market for tele- 
processing monitors. However, IBM has 
been less successful in selling its desktop 
relational DBMS. The OS/2 Database 
Manager, an integral part of OS/2 Ex- 
tended Edition, has not yet established 
dominance. This is due to the generally 
slow acceptance of Operating System/2. 
Still, DB2 professionals would be wise to 
concern themselves with the OS/2 Data- 
base Manager and its potential impacts on 
their shops for several reasons. 

Systems Application Architecture 
(SAA) makes it clear that IBM’s four 
RDBMsSes will converge. Features avail- 
able on one DBMS will soon become 
available for the others. Studying DB2’s 
counterpart RDBMSes on other platforms 
portends its future directions. 

Also, IBM’s distributed database plans 
call for communications between DB2 and 
the Database Manager. Many IBM shops 
will opt for a two-tier communications ar- 
chitecture with DB2 acting as a repository 
for data downloaded to desktop machines 
running OS/2 Database Manager. Last, 
industry experts predict the Database 
Manager will become a dominant desktop 
DBMS, especially in larger accounts. 

These facts force DB2 professionals to 
confront a host of issues that must be re- 
solved in order to foster a happy marriage 
between DB2 and the Database Manager. 
DB2 personnel must plan for the probable 
use of the Database Manager in their shops 
from the standpoints of both applications 
development and technical support. DB2 
users must address these issues: 

* How portable are code and applica- 
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tions between DB2 and the Database 
Manager? 

* How can DB2 and the Database Man- 
ager coexist in the mixed systems en- 
vironment postulated by SAA? 

¢ Will programmer skills be transfer- 
able from DB2 to the Database Man- 
ager? What about end-user training? 

* How will MIS deal with the support 
issues involved in this mixed system 
environment? 


No one article can address all these is- 
sues. This article presents some key as- 
pects of the Database Manager in terms 
of the applications development and sup- 
port issues that DB2 professionals will 
encounter. The versions of the products 
this article refers to are DB2 Version 2 
Release 1 and OS/2 Database Manager 
Version | Release 2. 


SQL Programming 


A starting point in comparing any 
two relational DBMSes is their versions 
of SQL. Figure 1 provides such a com- 
parison. 

Like DB2, the Database Manager fea- 
tures Data Manipulation Language (DML) 
and Data Definition Language (DDL). Its 
DML is basically the same. However, the 
Database Manager offers the additional 
keywords EXCEPT and INTERSECT for 
operating on the results of SELECT state- 
ments. 

The Database Manager’s DDL for log- 
ical objects (tables, views and indexes) is 
essentially the same as DB2’s, while its 
DDL for physical objects (tablespaces, 
index spaces, storage groups and data- 
bases) is totally different. The Database 
Manager does not generally permit con- 


trol over physical storage because the 
desktop machine requires greater ease of 
use and less technical expertise than the 
mainframe environment. PC users do not 
have expertise in database administration. 

Until the announcement of OS/2 Da- 
tabase Manager Version 1.2, the prod- 
uct’s only security was the assignment of 
a single password per database. There 
were no SQL GRANT or REVOKE state- 
ments. Version 1.2, due in November 
1989, adds these DCL statements to Da- 
tabase Manager SQL. However, while the 
Database Manager’s approach to security 
is conceptually similar to that of DB2, 
significant differences exist in security 
administration. The Database Manager’s 
GRANT and REVOKE statements are 
much narrower in scope than their coun- 
terparts under DB2. 

The bottom line for the SQL compari- 
son, therefore, is that the user-oriented 
SQL is largely the same, while the levels 
of the language that map onto real storage 
and security are different. Database pro- 
gram code that only issues DML and log- 
ical DDL will be much more portable than 
code that manipulates physical objects or 
controls security. 

End users and applications program- 
mers who work with high-level SQL 
statements will see little difference be- 
tween the Database Manager and DB2. 
DBAs and systems support staff will see 
major differences. However, they should 
find it easy to adapt to the differences in 
Database Manager SQL because it is sim- 
ilar to and more simple than DB2. 


More Subtle Aspects Of 
SQL Programming 


If you intend to port applications be- 
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tween the Database Manager and DB2, 
there are many, more subtle implemen- 
tation differences to be concerned about 
than merely the SQL language. Here are 
a few examples: 


* Isolation levels: prior to Version 1.2, 
the Database Manager supported RE- 
PEATABLE READ only; now it sup- 
ports CURSOR STABILITY and a 
new option unavailable under DB2 
called UNCOMMITTED READ 


* Log: the Database Manager log is as- 
signed per database rather than per 
DB2 subsystem; the Database Man- 
ager does not perform log archiving 
like DB2 


* Recovery: the Database Manager rolls 
back like DB2, however, disaster re- 
covery of a database is to the time of 
last backup (either full or incremen- 
tal) rather than to the last commit point 

* Catalogs: each Database Manager da- 
tabase is assigned its own catalog that 
has a smaller number of tables than 
DB2’s and the contents and column 
names differ; the basic design and 
usage of the catalogs are the same as 
in DB2 


* Utilities: Database Manager utilities 
are similar to those of DB2 in their 
functions; however, there are impor- 
tant differences in their operations 
and the manners in which they are 
invoked. 


The above comparisons are only indic- 
ative and are not comprehensive. How- 
ever, they should be enough to convince 
you that porting code and applications be- 
tween the Database Manager and DB2 
could be a complex undertaking, de- 
pending on the nature of the application. 
Difficulties can be vastly reduced by 
knowledge of these differences during ap- 
plications development and design. 

The porting of code requires a lot more 
than simply equivalent SQL. Factors like 
isolation levels and locking can be criti- 
cal. Structural aspects of the DBMS, such 
as its approaches to the catalog, security, 
utilities, logging and recovery are also 
fundamental to successful cross-system 
applications. 


The Applications Development 
Environment 


To accurately address applications de- 
velopment and support issues, consider 
more than the DBMS itself. The availa- 
bility of similar tools across environments 
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probably does more to determine the 
transferability of programmer skills across 
systems than the similarities and differ- 
ences of the DBMSes. For example, if a 
programmer generates applications with 
one tool with DB2 and that tool is not 
available with the Database Manager, a 
skills problem slows applications devel- 
opment regardless of how similar the 
DBMSes are. The mainframe program- 
mer skilled in COBOL, ISPF/PDF and 
JCL who suddenly confronts C and the 
OS/2 command language on the desktop 
has the same problem. Applications de- 
velopment involves much more than com- 
patible DBMSes. 

This is, of course, the problem SAA 
addresses. Figure 2 shows that there is a 
definite disparity in the applications de- 
velopment environment between the Da- 
tabase Manager and DB2. While SAA is 
bringing great progress in this area from 
the viewpoint of applications developers 
and support personnel, there are still sig- 
nificant differences between the environ- 
ments. Those working with multiple SAA 
RDBMsSes need to be cognizant of these 
differences. 


Also, recognize that the figure com- 
pares only IBM-vended tools for both en- 
vironments. Any third-party software you 
use in either environment should be added 
to the comparison. 

Many companies are committed to 
making their desktop development prod- 
ucts compatible with the Database Man- 
ager. While tools are rare today, in the 
long-term application, development work- 
stations will be available that fit well with 
both DB2 and the Database Manager. 


Conclusions 


The OS/2 Database Manager is, in 
spirit, DB2 on the PC. It contains the same 
broad sweep of features as DB2 and brings 
many of them, for the first time, to the 
desktop. In this respect, the Database 
Manager is an innovative product that 
breaks new ground. 

While conceptually similar to DB2, the 
Database Manager is a different relational 
DBMS implementation. This article pro- 
vides some examples of these differences 
but does not catalog them all. DB2 shops 
that obtain the OS/2 Database Manager 
and adopt IBM’s SAA are wise to be cog- 
nizant of some of these less-frequently 
discussed issues. 

There are many real-world factors im- 
portant to MIS installations that deal with 
SAA DBMS other than DB2. Discussion 
among industry analysts, the press and 
vendors focuses primarily on SQL as the 
vehicle for transportability of applications 
and technical knowledge. This approach 
has merit. However, accepting it as a final 
answer is hazardous to MIS installations 
involved in real projects responsible for 
applications development and support. 
Developers must be concerned with op- 
erational characteristics of the DBMS and 
the larger applications development en- 
vironment, as well as SQL language dif- 
ferences. = 
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24 hours a day, 7 days a week via our toll-free hot line. 


WORLDWIDE AVAILABILITY 


PLATINUM’s products and services are available 
around the world through our Affiliate Network. 
PLATINUM’s full service capabilities include local 
support, education, and superior DB2 professional 
services. 


- 


with DB2! 


2 


Tn Ba SMe 


PLATINUM technology, inc. 


555 WatersEdge Drive 
Lombard, IL 60148-9930 
(312) 620-5000 FAX (312) 953-1923 


For further information, in-house demonstration, or 
our exclusive no-obligation product evaluation call: 


1-800-442-6861 


CIRCLE #7 on Reader Service Card A 


Understanding 


Program 


Exceptions 


ost programmers categorize pro- 
M gram exceptions (program inter- 

rupts) under the general topic of 
ABENDs. Although the common usage 
may have made the lack of differentiation 
between a program exception and an 
ABEND acceptable, there is a big differ- 
ence between the two. Program excep- 
tions are detected by hardware while 
ABEND conditions are detected by soft- 
ware, usually the operating system. To 
further confuse the issue, programmers 
often do not understand the differences in 
processing between the hardware and the 
operating system. 

When you attempt to add two packed 
decimal numbers together, whether the 
program doing the add was written in As- 
sembler language or a high-level lan- 
guage like COBOL, the hardware will ex- 
ecute an Add Packed (AP) instruction. If 
one of the fields is not a valid packed 
field, the hardware generates a program 
interrupt and an exception condition oc- 
curs. This is distinct from an error such 
as attempting to open a non-existent file. 
An OPEN macro in Assembler (or OPEN 
verb in COBOL) generates a Supervisor 
Call (SVC) instruction. This passes con- 
trol to the operating system (MVS, VSE 
and so on). If the operating system soft- 
ware detects a problem while attempting 
to open the file, it may decide to issue an 
ABEND instruction. This would be con- 
sidered a true ABEND. 

To more finely define ABENDs, the 
system breaks them into two different 
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types, system ABENDs and _ user 
ABENDs. System ABENDs occur when 
the operating system issues an ABEND 
macro; user ABENDs occur when a user 
program issues the ABEND macro. 
ABENDs that occur in programs written 
by software vendors are not operating 
system ABENDs. For instance if DB2, 
IMS or IDMS software decides to issue 
an ABEND, the ABEND will be a user 
ABEND. Obviously, if DB2, IMS or 
IDMS requests a service from the oper- 
ating system (such as to open a database 
file) and the request fails, a system 
ABEND may occur. 

A list of the system ABENDs can be 
found in OS/VS Message Library: VS2 
System Codes. User ABENDs can be 
found in the documentation describing a 
programming product such as the VS 
COBOL Programmer's Guide or by ex- 
amining the program causing the user 
ABEND. 

The basic difference between . an 
ABEND and a program exception is that 
while an ABEND is always done on pur- 
pose by the program issuing it (either the 
operating system or the user program), a 
program exception will occur unexpect- 
edly by a program (except in rare cases 
when a program interrupt is used in place 
of an ABEND or for special reasons in 
sophisticated code). This article will dis- 
cuss the program exceptions numbered one 
through B (OC1 through OCB). 

One of the reasons (but certainly not 
the only reason) that programmers have 


trouble understanding dumps is because 
they do not realize what they represent. I 
have already explained the difference be- 
tween an ABEND and a program excep- 
tion and will now explain various pro- 
gram exceptions. I once was trying to 
explain to a colleague that most program- 
mers do not know what an OCI program 
exception is. He quickly answered that 
most programmers do know that it is when 
you branch to a program that was not in- 
cluded in the linkedit. He had given a 
specific instance of an OCI program ex- 
ception, not describing what it was. His 
answer was similar to an answer of 
““DB2”’ to the question of ‘‘What is a 
database?’’ 


0C1 Operation Exceptions 


An OCI program exception is an op- 
eration exception. It indicates that the CPU 
attempted to execute an instruction that 
was invalid for the hardware. On the IBM 
370 hardware a machine language in- 
struction is one byte long (excluding a 
few privileged instructions that are two 
bytes long), allowing 256 different val- 
ues. Less than 256 instructions exist so 
not all of the possible values are valid. 
When an Assembler language program 
calls another program, the reference is 
through a V-type address constant that gets 
resolved at linkedit time. If the V-type 
constant is not resolved, it is set to zero. 
When the program then uses the V-type 
constant as an address to branch to, a 
branch to address zero in memory fol- 
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lows. This area in memory does not con- 
tain valid code and an operation excep- 
tion occurs. 

A program branch using an uninitial- 
ized address (such as using the value in a 
register that had not been properly set) 
may cause an OC1. Actually, you are lucky 
if an unexpected value in an address does 
cause an operation exception. Otherwise, 
if the uninitialized value happens to con- 
tain a valid address of code, you may end 
up running a piece of code that you did 
not intend to. It would be an extremely 
difficult problem to debug since it is con- 
ceivable that you might not even know a 
certain piece of code was executed. This 
is an important point to remember: when 
a program gets a program exception or 
ABENDs, you are probably lucky. Rather 
than forcing you to spend hours or days 
finding where a problem is occurring, the 
ABEND code can be used to reference 
the reason for the problem or the PSW 
will point to the code that is causing the 
program exception. The PSW is generally 
of little value when a true ABEND occurs 
since it merely points to the ABEND 
macro that canceled the job step. 

If an Assembler program attempts to do 
I/O before a dataset is opened, an OCI 
can occur. The address of the access 
method to perform the read or write is 
located in a control block (for example, 
the DCB). This address is filled in when 
the dataset is opened. If the dataset is never 
opened, the address will contain a zero 
and an I/O operation will cause a branch 
to address zero in memory. 

The OCI dumps that are usually the 
hardest to solve are the ones that occur 
due to a storage overlay. It is easy to find 
out why the OC1 occurred, but it may not 
be easy to find why the storage overlay 
occurred. For instance, if 100 bytes in the 
middle of your code in a dump contain 
a person’s address and that area in the 
program had been attempting to execute, 
you will get an OC1. In this case you know 
to look where the person’s address is 
moved and try to find the point where 
your registers were not set properly. How- 
ever, if a piece of code had been overlaid 
with two bytes of hexadecimal zeros, it 
would be a completely different matter. It 
may not be easy to determine where in 
the code the move of the bad data had 
been executed. 

An 0C2 program exception occurs when 
a program in the problem state attempts 
to execute a privileged instruction. Ap- 
plications almost always run in the prob- 
lem state. They are not allowed to issue 
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Program Exceptions 


privileged instructions such as those that 
change the PSW and storage keys. A pro- 
gram in the problem state may attempt to 
issue a privileged instruction that was not 
coded in it, since an unitialized register 
may cause a branch to an area in which 
memory contains the value of a privileged 
instruction. An 0C3 is among the rarest 
of events on a 370 machine. It can only 
occur when a program issues an Execute 
(EX) instruction that has another EX in- 
struction as its target. 


0C4 Protection Exceptions 


An 0C4 is one of the most common 
program exceptions. It occurs when a 


The basic 
difference between 
an ABEND 
and a program 
exception is that 
while an ABEND 
is always done 
on purpose by 
the program issuing 
it, a program 
exception will 
occur unexpectedly 
by a program. 


program attempts to store data into an area 
of memory (and also fetch data from an 
area of memory for some instructions) that 
is not allocated to the program. The spe- 
cific technical reasons for the interrupt can 
get complex since the hardware recog- 
nizes key-controlled protection when the 
access key is not equal to the storage key, 
low-address protection in the first 512 
bytes of memory and segment protection. 
Basically a protection exception indicates 
that although the memory requested for 
use exists in the hardware (either in real 


or virtual memory depending on the pro- 
gram executing), the hardware and oper- 
ating system are not allowing the program 
to use it. 

An 0C4 should not be confused with 
an OCS which is an addressing exception. 
An addressing exception occurs when the 
address used by an instruction does not 
exist in the hardware configuration. OC5s 
were more common before virtual stor- 
age. Programs used to run in real storage 
and, although addresses of up to 16MB 
were valid in the hardware, most ma- 
chines had a considerably smaller amount 
of memory. With virtual storage, a pro- 
gram usually has access to the maximum 
range of addresses allowed in a 370 in- 
struction and OCSs rarely occur. When in- 
valid addresses are used, the address will 
usually exist but will not be valid for use 
by the program running. This will cause 
an 0C4. 

The most common reason for a COBOL 
program to get an O0C4 is that a subscript 
or index exceeded its maximum value. 
However, there is a greater chance that 
parts of the program’s data or code will 
be overlaid than that an O0C4 will occur. 

The 0C4 will only occur if the index 
or subscript has a positive or negative 
value large enough to exceed the bound- 
aries of the program (for standard COBOL 
programs), exceeds the size of the 
WORKING-STORAGE and TGT (for 
COBOL CICS programs and COBOL II 
programs compiled with the RENT op- 
tion) or exceeds the length of a GET- 
MAINed area. In all of these cases, the 
0C4 will not occur if the area referenced 
happens by chance to fall into another 
program or another storage area within 
the job step. 

Another frequent cause of an 0C4 is the 
case when the USING clause in a CALL 
statement does not match the USING 
clause in the PROCEDURE DIVISION 
statement of the called program. This can 
cause the address of a data item to be 
missing or the length of a field to be in- 
correctly defined. In either case, the called 
program code may attempt to use an area 
not properly allocated to it and an O0C4 
may ensue. 

You should realize that when an 0C4 
occurs, the instruction causing the protec- 
tion exception may have already been 
partially executed. For example, if a Move 
Character Long (MVCL) instruction is 
executed, the protection exception may not 
occur until a multiple of 256 bytes had 
already been moved. This means that the 
registers pointing to the from and to fields, 
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DATA DIVISION. 
WORKING-STORAGE SECTION. 
01 TABLE1. 
05 FIELD1 OCCURS 3 TIMES 
PROCEDURE DIVISION. 
MOVE ZEROS TO TABLE1. 
ADD +1 TO FIELD1 (1). 


DATA DIVISION. 
WORKING-STORAGE SECTION. 
01 =FIELD1. 
05 FIELD2 
01 FIELD3 
PROCEDURE DIVISION. 
MOVE FIELD3 TO FIELD1. 
ADD +1 TO FIELD2. 


as well as the length of the data to be 
moved, may not contain the values which 
they contained when the instruction began 
to execute. 


0C6 Specification Exceptions 


An 0C6 program interrupt is a specifi- 
cation exception that occurs when certain 
instructions are specified incorrectly for 
execution. Examples are: a branch in- 
struction attempts to branch to an odd 
numbered address; an odd-numbered reg- 
ister is specified in an instruction that re- 
quires an even-numbered register; an in- 
valid floating-point register is used; or a 
decimal division or multiplication is ex- 
ecuted where the length of the first field 
is not greater than the length of the sec- 
ond field. 

OC6s rarely occur in COBOL pro- 
grams. With 360 hardware they occurred 
more frequently. Instructions like Load 
Halfword (LH) and Load (L) fullword re- 
quired the operands to be respectively on 
halfword and fullword boundaries. When 
COMP fields were used and slack bytes 
were not properly defined, 0C6s some- 
times occurred. 


0C7 Data Exceptions 


The O0C7 is the most widely received 
of all of the program exceptions. It is a 
decimal data exception and occurs when 
data is in an invalid format for the instruc- 
tion referencing it; specifically the nu- 
meric digits are not in the range of zero 
through nine or the sign is not one of the 
valid values of A, B, C, D, E or F. They 
most often occur when a program at- 
tempts to use a field that had not been 
initialized. 

Although many OC7s occur through 
oversights, a large number of 0C7 pro- 
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PIC S9(3) COMP-3. 


PIC S9(3). 
PIC S9(3) COMP-3 VALUE + 123. 


gram exceptions occur through lack of 
knowledge. One way to get invalid data 
into a COMP-3 field is to initialize a group 
level rather than the field itself. After the 
code in Figure | is executed, each of the 
three occurrences of FIELD1 will contain 
hexadecimal values of ‘FOFO’. The fields 
do not have valid signs (‘0’) and each 
field contains invalid digits (‘F’). A data 
exception will occur if any of the occur- 
rences of FIELD! are used in arithmetic 
operations. 

Another piece of code that will cause 
an 0C7 is in Figure 2. A field defined with 
a PIC of COMP-3 is moved to a group 
level and no conversion takes place. After 
the MOVE instruction is executed, 
FIELD1 (and, therefore, FIELD2) will 
contain a hexadecimal value of 123C40. 
This is not a valid display numeric field 
and will cause a decimal data exception 
if it is used in an arithmetic operation. 


Program Exceptions 0C8 
Through 0CB 


I will briefly mention other program 
exceptions. An OC8 is a fixed-point ov- 
erflow exception, occurring when a fixed- 
point signed binary arithmetic instruction 
or an instruction that shifts left a signed 
number causes an overflow. An OCA is a 
decimal overflow exception and is similar 
to an OC8, except that an OCA applies to 
decimal rather than binary numbers. It oc- 
curs when at least one non-zero digit is 
lost during the processing of a decimal 
instruction. When either a decimal over- 
flow or a fixed-point overflow occurs, ex- 
ecution of the instruction that caused the 
problem is completed. The result is cor- 
rect except that the information that oy- 
erflowed is lost. 

An 0C9 is a fixed-point divide excep- 
tion that is caused when a divide by zero 


occurs in a binary arithmetic operation or 
when a Convert To Binary (CVB) instruc- 
tion causes a result that exceeds the 32- 
bit register size. A decimal divide excep- 
tion (OCB) occurs when a zero is used as 
the divisor in a decimal divide instruction 
or when the quotient is greater than the 
size of the receiving field. 

The first step that is required to read a 
dump is to understand why the dump was 
produced. It is often needless to analyze 
the detailed data in a dump because the 
reason for the ABEND was quite explicit. 
For instance, if a program gets a user 
ABEND of 200 and it is clearly known 
through documentation that this error in- 
dicated a control card was missing from 
a file in the JCL, there is no reason 
to spend time analyzing the data in the 
dump. If the control card in question was 
present and the error still occurred, only 
then would it be necessary to investigate 
the dump. 

Too often a programmer attempts to find 
the reason for a user ABEND by search- 
ing through OS/VS Message Library: VS2 
System Codes or, even worse, by search- 
ing through MVS/370 Message Library: 
System Messages. Programmers must un- 
derstand the differences between program 
exceptions, operating system ABENDs 
and user ABENDs. Additionally, pro- 
grammers must learn to properly use the 
two manuals referenced above. The pop- 
ular expression, “‘] don’t have to mem- 
orize it; I can look it up in the manual,’’ 
is true if you are looking in the proper 
manual. Experience has shown that the 
average programmer does not under- 
stand the purpose of what should be the 
most commonly-used manuals. Knowl- 
edge will make the difference between 
fumbling through a dump page after 
page and effectively analyzing the in- 
formation in it. = 
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Our laser printers 
give new meaning to“sharing” 


Until now, sharing has been pretty one-sided: several 
workstations had to share one laser printer. But Printer 
Systems has redefined the idea of sharing. Now a laser 
printer can share across several dimensions. 


Different platforms 
Printer DRE 
Systems laser 
printers can 
be shared by 
several diffe- 
rent kinds of 
computers. 
Like IBM. And 
DEC. And, of course, 7 
PCs. All at ‘the same time. Coax, twinax, parallel, ae serial 
connector ports are provided on all our laser printers. 


Different applications 


And you can get some SPE Oya, 
pretty fancy things out of fh SALE) 
these different computers, pe os | e 


without a lot of program- 
ming. Like barcodes. And 
FlexFonts from BitStream, 
with access to over 2,000 
fonts. So now your mainframe 
can do what you thought you needed a PC for. 
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Different personalities 

With Printer Systems’ 
new laser printers, full 
emulation of the IBM 
3812, the DEC LN03 
Plus, and the HP 
LaserJet II is a given. 
In fact, our printers 
not only come standard 
with all the same fonts as IBM’s, DEC’s, and HP’s laser 
printers, but our font matrices are precisely identical to 
theirs. So ours print exactly the same as theirs. 


Real compatibility 
Complete com- 
patibility is a given : 
too, right down to : , , 
the resolution. Like the IBM 3812 , you can have 240 dpi 
for IBM applications. Or 300 dpi like the DEC LNO3 Plus 
and the HP LaserJet II. In the same machine. Switched— 
not scaled—by the machine itself depending upon 
the application. 


Introducing the Intelliprint sige 
Printer Systems’ new 

Intelliprint 218 permits all 

this sharing without j 

giving up perfor- 

mance. Its 32-bit 

RISC technology means 

that its real throughtput is 

the rated speed of 18 pages 

per minute. And its peak 

duty cycle of 50,000 pages per month means it can handle 

however much you demand of it. 


And the Intelliprint 106" 
Sometimes, you 
can have too much of a | 
good thing. So Printer 
Systems developed the 
Intelliprint 106. It, too, 
is based on 32-bit RISC 
technology, so its 6 
page per minute rated 
speed is its real 
throughput. And its duty cycle of 3,000 pages per month 
is ideal for lower-demand situations. 


Open architecture on a PC bus 


Printer Systems has also redefined “sharing” by 
putting a PC AT inside the Intelliprint 218. That provides 
all the functionality of a dedicated workstation. And, like 
any other workstation, it affords the flexibility to add 
options, like a LAN interface, for instance. 


Wait, there’s more 

In fact, there’s a lot more. Printer Systems has more 
up its sleeve, like spooling. And real-time, automatic 
switching between interfaces. And different graphics 
emulations. But we can’t tell you about all of it yet. At 
least not here. Why not give us a call at 1-800-638-4041? 
We'd be delighted to fill you in. So you can start sharing 
the way sharing was meant to be. 


ir 


Compatible in every way 
Printer Systems oe nese , Corporate Headquarters: 9055 Comprint Court, Gaithersburg, Maryland 20877 


(301 


258-5060, (800) 638-4041, Fax: (301) 926-7333, Telex II: 710 828 9627 


IBM and IBM 3812 are registered trademarks of International Business Machines Corporation. DEC and LNO3 Plus are registered trademarks of Digital Equipment Corporation. HP LaserJet II 
is a registered trademark of Hewlett Packard Corporation. FlexFonts and Bitstream are registered trademarks of BitStream Corporation. 


CIRCLE #50 on Reader Service Card A 


Dataset 
Management 
Reduces DASD 
Utilization, 
Boosts CPU 


Performance For 


(GPM Insurance 


Insurance company 


tracks tapes and disks 


with EPIC/VSE 


By Rachael Payne 


successful organizations increasingly 

depend on information technology to 
sharpen their ability to anticipate trends, 
service customers and reduce costs. Even 
details like dataset management can be 
automated to improve productivity and 
contribute to the bottom line. Govern- 
ment Personnel Mutual Life Insurance 
Company (GPM) in San Antonio, TX is 
a case in point. By taking control of its 
data processing resources (including tape 
and disk management), GPM increased 
management control over its disk and tape 


I: today’s competitive environment, 
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resources, saved money and decreased 
DASD and CPU utilization in the bargain. 

To meet its burgeoning DP require- 
ments, GPM operates an IBM 4341 Group 
II under VM/SP. Its main production guest 
machine is under VSE/AF. The company 
is currently installing VSE/SP 2.1.7. Its 
DASD configuration includes 22 spindles 
of IBM 3350 drives which are being 
phased out and 16 addresses of IBM 3380 
drives. GPM’s data center operates 24- 
hours-a-day, six-and-a-half days a week 
and, according to Systems Programmer 
Roger E. Moore, it manages a rapidly 


growing tape and disk library, including 
more than 1800 active reels of tape. To 
better manage this vital resource, GPM 
uses EPIC/VSE from Tower Systems 
(Costa Mesa, CA), a tool designed to 
consolidate management of datasets and 
reduce manual intervention in controlling 
both tape and disk dataset resources. 


More Throughput 


EPIC/VSE was installed in 1987 when 
the growth of the insurance company’s 
datasets began to threaten the ability of 
the staff to control them properly. It had 
been using Tower’s TD-FAST but was 
forced to upgrade because the former 
product does not support 3380 disk drives. 
Although GPM’s evaluation committee 
was aware of a number of other commer- 
cial packages, it selected EPIC/VSE pri- 
marily because of its compatibility with 
TD-FAST. No catalog changes were re- 
quired other than the EPIC automatic con- 
version utility. ‘“The conversion process 
from TD-FAST to EPIC was virtually 
painless,’ Moore reports. ‘‘Both systems 
used the same catalog, so all that was re- 
quired was essentially a backup and re- 
store and we were in business.”’ 

EPIC/VSE eliminates time-consuming 
and error-prone manual dataset manage- 
ment procedures. It offers users a unified, 
interactive approach to managing, secur- 
ing and reporting on all tape and disk 
dataset resources. Designed to manage 
both tapes and disks using a single, in- 
tegrated catalog, EPIC/VSE’s tape facil- 
ities improve response time at the opera- 
tor console. Its disk facilities promote 
improvements in DASD space and chan- 
nel utilization. 

GPM is gratified that EPIC/VSE is 
helping reduce its DASD requirements, 
Moore notes. It is more efficient in allo- 
cating DASD space than an operator us- 
ing manual calculations. ‘‘Personally, I 
find I normally over-allocate by as much 
as 50 percent to accommodate future 
growth of files. With the ability of EPIC 
to control secondary allocations and to 
truncate track allocations when files are 
closed, we take only the space we need,”’ 
Moore points out. Without its present da- 
taset management system, Moore says 
GPM would have to add 25 percent to the 
volume of disk storage required for in- 
terim work files. For example, if an ap- 
plication program defines a data file that 
had 10,000 tracks allocated to it, but only 
writes two records to that data file, EPIC/ 
VSE modifies the VTOC entry for that 
file so it physically takes only as much 
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room as it needs. The remainder of the 
disk space is released to the pool. ‘‘It al- 
lows us to define pools of disk work space 
and that has cut down the amount of disk 
work area that would otherwise be re- 
quired.’’ Moore adds. 

He emphasizes that EPIC/VSE’s disk 
space allocation is based on an entry in 
the EPIC Data Set Name (DSN) catalog 
for its primary and secondary allocations, 
if desired. ‘“‘This eliminates the error- 
prone guesswork of calculating the num- 
ber of blocks or tracks needed for a disk 
file,’’ he says. Moore explains further that 
if a programmer underestimates the num- 
ber of records required, the program al- 
locates an additional 50 percent of the 
primary allocation as a default if no sec- 
ondary allocation parameter has been spe- 
cifically defined in the DSN catalog. If 
too many records are estimated, auto- 
matic file truncation returns unused file 
space to the disk pool for immediate 
availability. This provision reduces the 
pressure for additional disk devices. 

GPM computer operators also like EP- 
IC’s Enhanced Subdataset feature allow- 
ing them to put multiple, individually 
named datasets on a single reel of tape. 
When they call for any one of those da- 
tasets, EPIC automatically identifies the 
correct tape and positions itself at the ap- 
propriate point on the tape. GPM opera- 
tors use it extensively for tape backups 
and occasionally for restores. 

Although EPIC allows data centers to 
dispense with the need to affix physical 
labels to tapes, GPM still maintains that 
practice. ‘‘No one really looks at the la- 
bels anymore but we still do it,’’ Moore 
admits. ‘‘Old habits are hard to break.’’ 
On the other hand, GPM takes advantage 
of EPIC’s vaulting option for off-site stor- 
age of tapes. Paper labels for these vault- 
bound tapes are occasionally useful. La- 
bels help archive and personnel confirm 
that they are dealing with the correct tape. 
As new generations get created, the vault- 
ing mechanism tells operators which reels 
to bring to the primary data center and 
which to archive. 


Reduced Rerun Time 


Measuring the cost-effectiveness of 
such automation is notoriously difficult, 
Moore concedes. Nevertheless, the con- 
sensus at GPM is that EPIC has delivered 
substantial benefits. In justifying the 
product, GPM first considered the oper- 
ations rerun time that could be saved by 
prohibiting errors of the incorrect tape 
going into an application. Decreased 


MAINFRAME JOURNAL * OCTOBER 1989 


Dataset 


rate of errors resulted in improved pro- 
ductivity. 

“Throughput has been tremendous,’ 
he adds. ‘‘We derive a high level of pro- 
ductivity without a lot of manual inter- 
vention. EPIC has certainly helped con- 
trol both the growth of personnel and the 
expansion of disk space requirements. It 
was obvious to us from the beginning that 
it generated dollar benefits in excess of its 
costs,” Moore says. EPIC/VSE helps 
GPM concentrate on the total manage- 
ment of datasets, regardless of their stor- 
age media, and helps keep track of the 


well-positioned to manage that growth. 
‘“‘EPIC/VSE is important to the integrity 
of the data center. It allows us to utilize 
disk space much more efficiently, makes 
sure that correct tapes are mounted and 
helps us better maintain our catalogs. It 
will not limit our growth; our dataset 
requirements are provided for,’’ Moore 
explains. 

Moore would like to comment on Tow- 
er’s technical support, but cannot. ‘‘When 
a software product works well, you never 
have any problems with it and it does 
everything it’s advertised to do, there’s 


GPM increased management control over its disk and tape resources, saved money and decreased 
DASD and CPU utilization in the bargain by taking control of its data processing resources. Seated from 
left are Manny Raneir, programmer analyst, and Gary James, supervisor of operations. Standing 
from left are Bill Sendelbach, manager of operations, Don Havel, programmer analyst, 
and Roger E. Moore, systems programmer. 


location of datasets. Features, such as dy- 
namic allocation, increase programmer 
productivity, he adds. According to 
Moore, it all comes down to confidence 
in the system. The new tape management 
system is simply trusted more. ‘‘The sys- 
tem detects whether operators acciden- 
tally mount or scratch wrong tapes,’ he 
says. 

As its business needs evolve, GPM ex- 
pects its tape and disk library to grow pro- 
portionately with its client base. The in- 
surance company will expand its range of 
services and this action will put even more 
pressure on dataset management. GPM is 


not much to say. EPIC is definitely an 
asset to GPM,”’ he points out. Finally, 
EPIC has been well accepted by the GPM 
computer operators. ‘‘What would the 
operators say if we took EPIC away from 
them?’’ Moore muses. ‘‘I don’t think the 
answer would be printable. We’d have a 
small mutiny here,’’ he concludes. = 
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VM In The Development Center 


his is the second in a series of ar- 
ticles discussing how application 


development teams can use VM to 
improve their productivity. The first arti- 
cle (June 1989 issue) presented an over- 
view of development issues and focused 
on how to make effective use of NOTE, 
VM’s electronic mail facility. This article 
continues the theme by examining VM’s 
edit environment. 


Profile XEDIT 


Writing programs in VM requires a full- 
screen editor: XEDIT. You should config- 
ure XEDIT so that the full-screen display 
begins just below the lines showing file 
name, line number and cursor position. 
You may also want to move the scale line 
with its column numbers from mid-screen 
to the top. To do this, you need to create 
a PROFILE XEDIT: 


/* REXX profile for XEDIT * 
SET SCALE ON 3 
SET CURLINE ON 4 


If you FILE at this point, your next edit 
session will use these new commands. 
Typing errors for common commands 
occur frequently. You can anticipate cer- 
tain transpositions and tell XEDIT to treat 
them as synonyms. For example: 
SET SYNONYM FIEL 4 FILE 
This command tells XEDIT to treat the 
four-character string FIEL as if it were 
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FILE. You can include any number of 
synonyms, but you should be careful not 
to transform one command accidentally 
into another. 


AUTOSAVE 


XEDIT has an option, AUTOSAVE, 
that saves your file at regular intervals 
during each session. Shops in which the 
system crashes with appalling frequency 
need to set this option on. More stable 
installations may prefer not to. All editing 
in XEDIT takes place in memory. XEDIT 
normally updates a file only when told to 
do so. This has some advantages. You 
might have a bright idea about moving 
code around, get half way through and 
realize it will not work. In XEDIT mode, 
a simple QQUIT command leaves your 
original unaltered. 

Effective use of this option requires 
some common sense. If you spend eight 
hours editing a file without SAVEing it, 
you leave yourself seriously vulnerable if 
the system crashes. Likewise when you 
feel a bright idea coming on, you would 
do well to SAVE before starting and not 
SAVE again until you are sure you want 
to keep what you have done. 


NULLS 


XEDIT allows inserting forgotten words 


Program | 
Writing In| 


EDIT 


or letters into a line using the INSERT 
key. This is easiest if you include: 

SET NULLS ON 
in the PROFILE. If you set NULLS OFF, 
you must move the cursor to the end of 
the line, hit ERASE-EOF, then move back 
to where the insert belongs. The disad- 
vantage of NULLS ON is that anything 
you put at the right-hand edge (such as 
comments) will fall to the left unless you 
explicitly enter spaces. 

You can avoid this disadvantage by 
adding: 

SET FULLREAD ON 
to the PROFILE. Then XEDIT will read 
every position on the screen, including 
nulls which it converts automatically into 
the missing blanks. FULLREAD has 
higher overhead because it causes more 
data transmission. It may cause a per- 
formance problem, particularly for re- 
mote terminals. You should monitor how 
well your system performs with FULL- 
READ ON. Instead of including it auto- 
matically in a system PROFILE XEDIT, 
you might want to train staff to activate 
it only as needed from the command line. 


PF Key Settings 


You will probably want to define the 
PF keys to fit familiar conventions, per- 
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haps ones from prior edit environments. 
XEDIT allows you to set as many PF keys 
as the terminals have and to override any 
defaults. You should, however, observe 
some exceptions to this freedom. PF3 is 
one. VM uses PF3 again and again to 
QUIT a process. Moving QUIT to an- 
other PF key may ultimately slow the 
staff’s adaptation to VM. Also, you should 
never set a PF key to QQUIT, even if you 
think users will use that command fre- 
quently. QQUIT exits an edit session im- 
mediately without saving the file and with 
no user-friendly ‘‘are you sure’’ message. 
The extra effort of typing the command 
(or its abbreviation, QQ) is worthwhile to 
avoid serious loss from accidentally hit- 
ting the wrong PF key. 

You should define the PF keys so that 
the staff can easily examine more than 
one file at once in split-screen mode. 
These are the same commands as you 
used with NOTE. Just add them to the 
PROFILE: 


SET PF21 SCREEN 2 
SET PF22 SCREEN 1 


You can, of course, use any PF key, not 
just 21 and 22. The first command splits 
the screen horizontally; the second un- 
splits it. The horizontal splits are the most 
common because they show a full 72 col- 
umns, but staff members may also want 
a vertical split for comparing, say, two 
versions of the same program: 

SET PF23 SCREEN 2 V 
You can let them move the cursor man- 
ually from one split-screen area to another 
with the arrow or tab keys or you can set 
up another PF key to speed the process: 

SET PF24 SOS TABCMDB 
TABCMDB jumps the cursor from com- 
mand line to command line. 

Some uses of XEDIT require all upper 
case — coding COBOL, for example. 
Others, such as documentation, must 
have mixed case to be readable. You may 
also wish to write your REXX EXECs 
in upper case, but put the comments in 
mixed case to make them easier to dis- 
tinguish. Defining two more PF keys sim- 
plifies switching from mixed to upper case 
and back: 


SET PF16 CASE U 
SET PF17 CASE M 


Staff members may want to look at data 
files whose line length exceeds the screen 
width. XEDIT’s default lets the extra data 
wrap around onto the following lines. 
Most people find this difficult to read. You 
could have them type a VERIFY com- 


mand or you can define another PF key: 
SET PF18 VERIFY 1 72 


You may even want to implement this 
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KEDIT 4.0 


XEDIT COMPATIBLE PC EDITOR 


KEDIT™ is a text editor for DOS and 
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goes beyond XEDIT compatibility 
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g@ Interfaces to Personal REXX, 
our complete implementation 
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command automatically every time they 
XEDIT a file. In that case you add: 

SET VERIFY 1 72 
to the PROFILE. 

XEDIT’s default settings include PF 
keys for paging through a file one screen 
at a time. This will suffice for small files 
but not for anything more than 60 lines 
(three screens). Staff members will need 
to be able to move to one end of a file or 
the other quickly. A PF key for the TOP 
command is simple: 

SET PF13 TOP 
But BOTTOM puts the last line of the file 
at the current line which is often so high 
that only one line displays. A multiple 
command solves this situation: 


SET LINEND OFF 
SET PF13 BOTTOM # '—17' 
SET LINEND ON # 


By temporarily turning off the normal end 
of line character (#), XEDIT equates 
PF13 to a string that includes the #. PF14 
then treats BOTTOM and —17 as two 
commands and it executes —17 after 
BOTTOM as if they were on separate 
lines. The result is that staff members see 
a full-screen display of the final 18 lines 
of data. 


Data Entry? 


... with only ONE panel 


definition! 


© 6209125 
©. 8209125 


@ Create panel libraries 
e Create window overlays 


e Replace DMS without changing source 


XEDIT 


From the command line, staff members 
can move any distance up and down a file 
by typing + or — the number of lines. 
To repeat the action, they can use the de- 
fault setting for PF9, *‘=’’, that auto- 
matically reexecutes the last command. If 
they wish to recall the command to change 
it, they can use the default setting for PF6, 
‘*?”’. Moving through a file this way re- 
quires several keystrokes. Instead, you can 
define extra PF keys for commonly used 
screen shifts. A half-screen shift, forward 
and backward, would be: 


SET PF19'+10' 
SET PF20 '—10' 


VM allows several PROFILE XEDITs. 
You may put a standard edition on the 
public access Y disk and also set up one 
specifically for the project team on an- 
other shared minidisk. Individual staff 
members can ignore both of these and keep 
a unique PROFILE XEDIT on their own 
A disks. VM will use whichever PRO- 
FILE XEDIT it finds first in the search 
chain, beginning with the A disk and pro- 
ceeding down the alphabet. A shop can 
have as many different PROFILEs as staff 
members. Remember, however, that such 
a PF key Tower of Babel makes train- 


THE RATIONAL DISPLAY 
MANAGER FOR VM 
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e IBM 7171 support 
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ing and troubleshooting decidedly more 
difficult. 


XEDIT Macros: XC 


XEDIT allows you to write additional 
commands called macros. Two of the most 
popular macros simplify the process of 
copying lines from one file to another in 
split-screen mode. The first copies either 
one line (XC) or a group of lines 
(XCC. . .XCC). The second (G) inserts 
whatever XC or XCC copied. Both are 
available on public VM workshop tapes. 
The versions below offer a more visibly 


structured format: 


/*  XEDIT prefix area copy macro */ 
PARSE ARG PREFIX CALLTYPE PLINE OPERANDS 
100.MAINLINE: 

PARSE SOURCE..... MACNAME . 
/* Error checking */ 
IF PREFIX NOT = 'PREFIX' THEN SIGNAL 200.NOTPREFIX 
IF CALLTYPE = ‘CLEAR’ THEN EXIT 
IF CALLTYPE = ‘SHADOW’ THEN SIGNAL 210.SHADOW 
IF CALLTYPE NOT = ‘SET’ THEN SIGNAL 200.NOTPREFIX 
/* \|s the command XC or XCC? */ 


SELECT 
WHEN MACNAME = 'XC' THEN DO 
IF OPERANDS = "' | DATATYPE(OPERANDS,’W') THEN 


‘COMMAND : 'PLINE ‘PUT’ OPERANDS 

ELSE SIGNAL 330.INVALIDOP 

END 

/* For XCC, determine whether it is the first or last of the 

pair. If first, set up the start of a block. If last, close 
and save the block. */ 

WHEN MACNAME = 'XCC’ THEN DO 

IF OPERANDS NOT = "' THEN 220.INVALIDOP 

"COMMAND EXTRACT /PENDING BLOCK* MACNAME '/' 

/* Was there a prior XCC? = */ 

IF PENDING.O = OTHEN /* NopriorXCC */ 

‘COMMAND : 'PLINE 'SET PENDING BLOCK’ MACNAME 

ELSEDO /* There wasapriorXCC */ 

‘COMMAND : * PENDING.1 'SET PENDING OFF’ 

‘COMMAND : 'MIN(PENDING.1, PLINE) ’PUT’, 

ABS(PLINE - PENDING.1) +1 

END 

END 

/* Something went wrong if the command is neither 

XC or XCC */ 

OTHERWISE ‘COMMAND EMSG INVALID SYNONYM -' 
MACNAME 

END 

EXIT 

/* Various error message routines */ 

200.NOTPREFIX: 

‘COMMAND EMSG USE ' MACNAME ' AS A PREFIX 
COMMAND’ 

EXIT 

210.SHADOW: 

‘COMMAND EMSG DO NOT USE’ MACNAME 'ON A 
SHADOW LINE’ 

EXIT 

220.INVALIDOP: 

‘COMMAND EMSG INVALID OPERAND -' OPERANDS 

EXIT 


XEDIT supplies the values for PRE- 
FIX, CALLTYPE and PLINE. The macro 
itself checks to make sure the command 
was used in the prefix area and not on a 
shadow line (one which the X or 
XX. . .XX function made invisible). With 
XC, it does an immediate write to storage 
(PUT) for the number of lines indicated 
by the operand. For example: 


XC3 —— FIRST LINE TO COPY... 
——— SECOND LINE TO COPY... 
——_ THIRD RINE TO GOPY:>: « 
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will hold all three lines for copying. If 
you use XCC instead, the macro deter- 
mines whether a pending block exists or 
should be started. It simply does the 
counting for you. This form: 


XCC —— FIRST LINE TO COPY. . . 
———— SECOND LINE TO COPY... 
XCC —— THIRD LINE TO COPY. . . 


has the same result as above. 

The PUT command loads the block you 
copied into a temporary file which lasts 
the length of your XEDIT session. 


XEDIT 


XEDIT Macros: G 


To retrieve the block, you need another 
XEDIT macro called G: 


/*  XEDIT macro for inserting stored blocks 9 */ 

PARSE ARG PREFIX CALLTYPE PLINE OPERANDS 

100. MAINLINE: 

/* Error checking */ 

IF PREFIX NOT = 'PREFIX’ THEN SIGNAL 200.NOTPREFIX 
IF CALLTYPE = 'CLEAR’ THEN EXIT 

IF CALLTYPE = 'SHADOW’ THEN SIGNAL 210.SHADOW 
IF CALLTYPE NOT = 'SET’ THEN SIGNAL 200.NOTPREFIX 
/* Get the stored block and forget any operands 9 */ 
"COMMAND :’ PLINE 'GET’ 
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IF OPERANDS NOT = "’ THEN, 

‘COMMAND EMSG OPERANDS IGNORED’ 

EXIT 

/* Various error message routines 9 */ 
200.NOTPREFIX: 

"COMMAND EMSG USE G AS A PREFIX COMMAND’ 


‘COMMAND EMSG DO NOT USE G ON THE SHADOW LINE’ 
EXIT 


This macro reads the same XEDIT val- 
ues and does the same error checking as 
XC, then simply inserts the stored text. 
For example, if you used G here: 


——— LAST LINE BEFORE THE COPIED BLOCK 
———— FIRST LINE AFTER THE COPIED BLOCK 


the result is: 


——— LAST LINE BEFORE THE COPIED BLOCK 
FIRST LINE TO COPY. . . 

SECOND LINE TO COPY. . . 

THIRD LINE TO COPY. . . 

FIRST LINE AFTER THE COPIED BLOCK 


You should put the G macro in a file 
called G XEDIT and the XC macro in a 
file called XC XEDIT. It is important that 
you include a synonym command for XCC 
in the PROFILE XEDIT so that XCC 
commands find the macro under its XC 
name: 

SET PREFIX SYNONYM XCC XC 
You could instead also separate XC and 
XCC into two macros. 

XEDIT macros are nothing more than 
REXX programs which use XEDIT facil- 
ities and run during an XEDIT session. 
Staff members might want to write ma- 
cros that enhance existing commands such 
as the search and replace. If, for example, 
they want to replace a variable name only 
under certain conditions, a macro can 
check for that condition before executing 
the replacement. Macros can run either 
from the prefix area, as in the examples 
above, or from the command line. They 
can be as long and elaborate as the writer 
wants. 

With XEDIT, the choice is yours. = 


rep) 


This article is adapted from chapter ten of VM Appli- 
cations Handbook (McGraw-Hill, 1989) Gary McClain, 
editor. 
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TSO/E REXX 


An Overview 


fter being available to the VM/ 
A CMS user community for several 

years, the Restructured EXtended 
eXecutor language (REXX) has recently 
become available to the MVS/TSO com- 
munity. Although the words restructure 
and extended may lead you to believe that 
REXX is a new version of an older lan- 
guage, REXX was designed by IBM dur- 
ing the late 1970s and early 1980s as a 
new language without any requirement for 
compatability with previous program- 
ming languages. 

It is important to note that IBM has 
made a statement of direction regarding 
REXX: ‘‘TSO/E REXX< is the implemen- 
tation of the SAA procedures language on 
the MVS system.’ Among other things, 
this means that REXX will probably be 
around for a while and it will probably be 
widely used. 

REXX programs, which are sometimes 
referred to as REXX EXECs, can now be 
run interactively under TSO/E or in batch 
under MVS. REXX EXECs will probably 
be used extensively in the TSO/E envi- 
ronment where they will perform tasks that 
have traditionally been performed by 
CLISTs. 

The TSO/E REXX lanaguage is an in- 
terpreted language. Among the strong 
points of the language are its ease of use, 
wide range of built-in functions and ex- 
tensive debugging capabilities. 

The following paragraphs are an over- 
view of the features within REXX that I 
consider most interesting and useful. This 
overview will not include specific details 
such as instruction syntax, but it will give 
you an idea of what tools are available to 
the REXX programmer. 


Ease Of Use 


The REXX language is essentially free 
format. Instructions can start at any col- 
umn and blank characters or lines are not 
meaningful. There are no headings or sec- 
tions to a program. Programs usually have 
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New to the 
TSO environment, 
REXX may replace 

CLIST; it is 

easy to learn, yet 


powerful. 


one instruction per line; however, REXX 
allows multiple instructions on one line 
and an instruction can span several lines. 
Punctuation is not required except to in- 
dicate continuation of an instruction or 
when there is more than one instruction 
per line. Variables do not need to be de- 
clared or data types identified (the mean- 
ing of data depends only on its usage). 


An Example Of A REXX EXEC 


Following is a simple REXX EXEC that 
divides two numbers supplied by the user. 

if REXX = 

say ‘please enter miles traveled.’ 

pull miles 

say ‘please enter gallons of gas used.’ 

pull gallons 

mileage = miles / gallons 

say ‘gas mileage for the trip was’ mileage 

exit 

The first line of the program shown 
above is a comment. Comments begin 
with **/**’ and end with **/*’’. Comments 
can be on one or more lines or on part of 
a line. IBM recommends that all REXX 
EXECs running under TSO begin with a 
comment containing the word ‘*REXX”’ 
in the first line. This is called the REXX 
identifier and distinguishes it from a 
CLIST. 

The SAY instruction is used to display 


a message on the terminal and PULL reads 
user-entered input. 

There are three variables in the pro- 
gram shown above: miles, gallons and 
mileage. Something peculiar about REXX 
variables is that before a REXX variable 
is initialized, it contains its own name 
translated to uppercase. For example, the 
instruction “‘say x’’ will display *‘X’’ un- 
less the value of x has been altered by a 
previous instruction. By means of an as- 
sigment, the value of a variable can be 
changed to contain decimal, floating point 
or character string data. 


Use Of Mixed And Lowercase 
Characters 


The REXX language processor will 
translate all alphabetic characters to up- 
percase before they are processed. To pre- 
vent this from happening, data within an 
EXEC can be enclosed in single or double 
quotes. This will ensure that the infor- 
mation is processed exactly as typed. 

When reading input from the terminal 
or arguments passed from another EXEC, 
the PARSE instruction can be used to 
prevent uppercase translation from tak- 
ing place. 


Additional Operators 


In addition to the conventional arith- 
metic operators (+,-,*,/,**), there are 
two new operators in the REXX lan- 
guage: 

% divide and return a whole number 

// divide and return the remainder only 

In addition to the conventional com- 
parison operators (=,<,>,7), REXX 
provides two ways of testing for equality: 
equal (=) or strictly equal (= =). Two 
expressions are ‘strictly equal’) when 
everything, including blanks and case, are 
exactly the same. For example, the fol- 
lowing expressions are all true: 


"ABC? = abc’ 
“ABC? == *' ABC’ 
"ABC? 7== "abe: 
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The NUMERIC Instruction 


The NUMERIC instruction of the 
REXX language is used to set parameters 
which in turn determine the way in which 
arithmetic operations are carried out. 

The DIGITS option of the numeric in- 
struction controls the precision, or num- 
ber of digits, to which arithmetic opera- 
tions will be evaluated. There is no upper 
limit, meaning that one could ask for an 
arithmetic operation to be carried to 1000 
or more decimal places. However, the 
IBM manual does warn about the exces- 
sive resource consumption of such pro- 
grams. The default of the DIGITS option 
is nine decimal places. 

The FUZZ option of the NUMERIC 
instruction controls how many decimal 
digits of error will be ignored during 
a numeric comparison operation. This 
value defaults to zero which means that 
under normal conditions, all digits are 
significant. 

The FORM option of the NUMERIC 
instruction controls the form of exponen- 
tial notation that will be used by REXX 
for the result of arithmetic operations and 
built-in functions. It can be SCIENTIFIC 
or ENGINEERING. 


Program Flow 


There are many instructions in the 
REXX language which can be used to 
control program flow. Among them is the 
conventional IF ... THEN ... ELSE 
instruction, a variation of it called the SE- 
LECT instruction and many DO. . . END 
instruction combinations. A few of these 
are the DO UNTIL which tests the 
expression after the loop executes at least 
once and the DO WHILE which tests the 
expression before the DO executes the first 
time. In addition, there is a DO FOR- 
EVER which will go on forever unless it 
encounters a LEAVE instruction. 

Unlike most procedural languages, there 
is no GO TO instruction in REXX — the 
closest thing to it is the SIGNAL instruc- 
tion. I think that the developers of the 
REXX language wanted programmers to 
write structured code only, so they left out 
the GO TO instruction. 

The SIGNAL instruction works like the 
GO TO instruction; it is used to transfer 
control to another portion of a program 
identified by a label. However, the use of 
the SIGNAL instruction within REXX is 
discouraged and can lead to problems. 
This is because all DO loops and IF 
clauses are terminated when the SIGNAL 
instruction is executed. For example, if a 
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SIGNAL instruction is executed from 
within a DO loop and it causes a branch 
to a different instruction within the same 
loop, the program will end with an error 
message as soon as it encounters the END 
statement. This is because the DO loop 
was terminated as soon as the SIGNAL 
instruction was issued, even though you 
did not leave the loop. I recommend that 
the SIGNAL instruction be used with cau- 
tion and only in situations such as branch- 
ing to an error routine when an error is 
encountered. 

REXX supports the use of subroutines. 
A subroutine is internal if it is contained 
within the same EXEC. If an EXEC calls 
another EXEC, this makes the called 
EXEC an external subroutine. Unless 
specified by the PROCEDURE option, an 
internal subroutine will share all its vari- 
ables with the main program. This means 
that the value of a variable is what was 
last assigned, regardless of whether the 
assignment was made in the main pro- 
gram or in the subroutine. External sub- 
routines do not share variables with their 
callers and information must be passed to 
them via arguments. All REXX routines 
are recursive, which means that a routine 
can call itself. 


Built-In Functions 


REXX provides a great variety of built- 
in functions. These have been classified 
as arithmetic functions, comparison func- 
tions, conversion functions, formatting 
functions, string manipulating functions 
and miscellaneous functions. Two ex- 
amples are: 

WORDS returns the number of blank 
delimited words in the input 
string; for example, X = 
WORDS (’the sky is blue’) 
will cause X to be set to 4. 
returns the nth blank delim- 
ited word in a given character 
string; for example, X = 
WORD (‘the sky is blue’,2) 
will cause X to be set to ‘sky’. 

These are just two examples from a set 
of more than 50 built-in functions avail- 
able. In addition, new functions can be 
developed by the user if the need arises 
for a function that has not already been 
supplied. 


The INTERPRET Instruction 


As the name implies, the INTERPRET 
instruction of the REXX language is used 
to evaluate and execute an instruction. The 
following EXEC illustrates how this in- 
struction can be used: 


WORD 


/* REXX calculator */ 

arg x 

interpret say x 

exit 

This four-line EXEC, when invoked 
with an arithmetic expression, can be used 
as a calculator. The first line of the EXEC 
is a comment, the second line reads an 
argument into the variable x, the third line 
will execute the instruction contained in 
the variable x and ‘‘say’’ the result and 
the fourth line will end the EXEC. For 
example, if the name of this EXEC were 
CA, then entering "CA 5.5 + 2.7 + 9.2’ 
will cause the EXEC to return the answer 
of 17.4. Unfortunately, this calculator does 
not do hex arithmetic. However, it will 
convert from hexadecimal to decimal and 
vice versa when invoked with the proper 
built-in function. 


The Data Stack 


The data stack is an expandable data 
structure used by REXX programs to store 
information. It is easiest to think of the 
data stack as a long array of elements; 
these elements can vary in width and data 
types. There is no limit to the number of 
elements or the size of the elements placed 
in the data stack. 

Elements can only be retrieved from 
the “‘top’’ of the stack (only one element 
is retrieved at a time) and elements can 
be placed (one at a time) on either side 
of the stack. 

The PUSH instruction places an ele- 
ment on top of the stack thereby creating 
a LIFO stack. The QUEUE instruction 
places an element on the bottom of the 
stack, thereby creating a FIFO stack. 

One of the most important functions of 
the stack is that it can be used to pass data 
between several programs or subroutines. 
A program gets access to the data stack 
whenever REXX relinquishes control to 
it. This means that the stack provides a 
way of passing large amounts of infor- 
mation between REXX programs and 
subroutines. 

Another function of the data stack is 
for processing commands at program ter- 
mination. Whenever a REXX EXEC ter- 
minates execution, if there are any ele- 
ments left in the stack, they will be treated 
as commands to be issued. Therefore, it 
is important to empty the stack unless you 
intend to process the remaining com- 
mands at program termination. This is a 
frequent cause of errors in REXX pro- 
gramming. If you have an EXEC that runs 
fine except for some error messages at the 
end, chances are that something was un- 
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You can add 150 users vs. TSO’s 10. 


Are your casual users slowing down TSO performance? 


SYSD can expand a shop’s service without 
concern for incremental CPU resource 
consumption. 


SYSD allows CICS users to have ISPF/PDF/SDSF 
and 328X-like functionality at their fingertips but 
with only a fraction of the overhead. 


Many companies are giving more users access to 
the CPU by selectively moving user groups away 
from TSO to CICS. In one situation, 8 to 12 
concurrent users on TSO brought the CPU to a 
standstill. When the ISPF load was shifted to 
CICS with SYSD, more than 150 concurrent 
SYSD sessions were active with minimal 
degradation in response time. 


150 users 10 users 


Your users can work faster. 


Customers report that SYSD is faster and easier 
to use. Its job management tools pave the way for 
maximum productivity. 


The SYSD “toolbox” includes: 


° ISPF/PDF-like edit/browse/DASD management 
° JES328X-like printer control 

¢ CPMS secured on-line report view 

e ISPF-like panel-driven Job File Tailoring 

¢ CICS application interface to JES 

e SDSF-like JES facilities 

° Security interface to RACF, ACF2, ‘Top Secret 
e Multiple concurrent sessions 

* PANVALET® interface 

¢ TSO to CICS gateway 


AND you can save your company thousands of dollars. 


One company that implemented SYSD: 
* Boosted programmer productivity by 25% 


* Saved $500,000 per year by avoiding the purchase of_an 
additional CPU. 


SYSD is model-group priced from $13,000 with over 500 
installations worldwide. Call today for more information 


hy 


H&W COMPUTER SYSTEMS, INC. 
PO. BOX 15190 

BOISE, IDAHO 83715-0190 
208-385-0336 * 800-338-6692 


and ask about a FREE TRIAL. 


Celebrating our 10th year! ¢ 
Ya 


SYSD* is a registered trademark of H&W Computer Systems, Inc. 
PANVALET™ is a registered trademark of Pansophic Systems, Inc. 
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intentionally left in the stack. 

The REXX language supports the use 
of multiple stacks. New stacks are created 
with the NEWSTACK instruction, stacks 
can also be deleted with the DELSTACK 
instruction. 


The EXECIO Instruction 


The EXECIO instruction of the REXX 
language can be used to perform I/O op- 
erations to a dataset. With a single read 


TSO/E REXX 


operation, an entire dataset can be placed 
in the stack or in an array. A single write 
operation will take the entire content of 
the stack or array and place it in an output 
dataset. Read-and-write operations can 
also be issued that will process only a 
record at a time. 


Tracing Commands 


The TRACE instruction of the REXX 
language provides the user with a wide 


Break Through VSE’s 
IGMB Real Memory Barrier 


For the first time VSE/SP users can address real 
memory greater than 16MB. W/ith VSE Extended Real 
Memory (VSE/XRM™), VSE users can take advantage 

of processors with more than 16MB without the 
expense and overhead of VM/HPO or VMIXA. 
With VSE/XRM users can run more applications 
concurrently, eliminate paging, improve I/O 
throughput, and increase CPU utilization. 


FOR MORE INFORMATION OR TO ORDER YOUR 30-DAY TRIAL 
PLEASE WRITE OR CALL TODAY: 


SOFTWARE FURSUITS ee CZ 
1420 Harbor Bay Parkway, Suite 200 ¢ Alameda, CA 94501 


(415) 769-4900 
TOLL FREE (800) 367-4823, or IN CALIFORNIA (800) 367-9851 
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variety of tracing options. The user can 
choose from tracing intermediate re- 
sults, only final results of instruction 
evaluation, only commands, only errors 
and so on. 

In addition, the interactive debug fa- 
cility permits the user to pause between 
instructions as (s)he traces. During a pause 
the user can insert instructions or dis- 
play fields. 


Addressing Different Host 
Command Environments 


The REXX language allows you to is- 
sue TSO, ISPF or MVS commands from 
within an EXEC. When the REXX lan- 
guage processor encounters a command, 
it passes it to the host command environ- 
ment for processing. The ADDRESS in- 
struction of the REXX language can be 
used to change the host command envi- 
ronment, so that a command can be routed 
to the proper environment for processing. 


Running REXX EXECs 
In Batch 


REXX EXECs that are too time con- 
suming to run interactively can be run 
in batch under TSO or in a non-TSO ad- 
dress space. 

REXX comes with a powerful pro- 
gramming interface that allows EXECs to 
call or be called by programs written in 
Assembler or a high-level language and 
residing in a load library. 


Summary 


Its simplicity and similarity with the 
English language make REXX an easy 
programming language to learn. 

Its rich selection of built-in functions, 
its ability to address different environ- 
ments and its powerful mathematical ca- 
pabilities make REXX a powerful tool for 
data processing professionals. 

In addition, REXX is fun. = 
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We’ re Your Free Global Information Access NeTwork 


The single source to find all your data processing 
needs: 

— Software Products 

— New Hardware Products 

— Data Processing Services 

— Consultants 

— Education 

— All Hardware Environments 

— All Operating Systems 

— Used Computers and Computer Equipment 


Personal Service: (414) 546-8496 

Call us direct and we will search our data base to 
find solutions that fit your business needs. Per- 
sonal assistance is available Monday through 
Thursday, 9:00 AM to 1:00 PM Central Time. Per- 
sonal Service is available FREE of charge. 


FAX Support: (414) 546-8499 

We also support facsimile, just send us a descrip- 
tion of your needs and we will search our data 
base and return to you a list of items that fit your 
requirements. FAX Support is available FREE of 
charge, 7 days a week, 24 hours a day. 


We cover the entire range of hardware and operat- 
ing system environments: 


Mainframes, Minicomputers, PCs. IBM (and 
PCM), DEC, Apple, Data General, and others. 
MVS, VM, VSE, UNIX, PC-DOS, and more. CICS, 
IMS, DB2, TSO, CMS, ISPF, etc. System Support 
Software, Application Software. Education, Con- 
sultants, and Conversion Specialists. Uninterrupti- 
ble Power Systems and Surge Protectors. Mo- 
dems, Cables and other Connectivity Solutions. 
Everything/anything related to data processing! 


Dial-up Access 
2400 baud — (414) 546-8480 
1200 baud — (414) 546-8492 


The network is available FREE of charge. Monday 
through Saturday. Use any of the popular PC com- 
munications packages that emulate a VT100 ter- 
minal, such as PROCOMM Plus™, CROSSTALK™, 


KERMIT and many others. 
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Used Computers and Computer Equipment 


GIANT now includes used computers and 
equipment. If you’re in the position to sell 
excess computer equipment, call us today 
for details. 
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ment, call our Personal Service number, 
access the GIANT Data Base from your 
PC, or send us a FAX. 


Software Manufacturers!! Hardware Manufacturers!! Service Suppliers!! 


Advertise your products and services on 
GIANT today. Put your message into every 
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day. Join with GIANT and become 


Pol 
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immediately. 
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THE BEST-KEPT SECRET IN 
VSE CONSOLE AUTOMATION. 


Today’s data centers are serious about managing their VSE opera- 
tions. Most realize the system console is the logical first step. But what 
many don’t realize is that the solution for VSE console automation is 
already in use at hundreds of data centers around the world. 


SINGLE IMAGE CONSOLE 


DOCS from SMARTECH SYSTEMS features a Single Image 
Console Facility under VM (SICF/VM) that lets you control multiple 
VSE systems from one DOCS console. Multiple VSE consoles are 
consolidated on one CRT, creating a more efficient operation. And you 
always have access to local or remote consoles because DOCS is not 
dependent upon an online system. 

The VM OPERATOR console can be consolidated and managed 
from the DOCS/VSE console, which means you view VM operations 
in full-screen 3270 mode using one less CRT. You can redisplay VM 
operator messages online and list VM hardcopy data because DOCS 
logs all messages to the hardcopy file with date and time stamp. You 
even have access to CMS minidisks and can execute REXX programs 
directly from the VSE console. 

MESSAGE SUPPRESSION AND ROUTING 

DOCS message suppression and routing capabilities let you cus- 
tomize your console to display only the messages you need to see. You 
can suppress messages at selected terminals, or route messages based 
on partition, device or user profile. 


.. AND MORE 


DOCS offers more than fifty additional features, making it the 
most comprehensive VSE console automation solution available, 
Features such as auto-reply, programmable function keys, security 
features, unattended operations capabilities and more. 


VM and VSE are registered trademarks of International Business Machine Corporation. SMARTECH and DOCS are trademarks of SMARTECH Systems, Inc. Copyright © 1989 SMARTECH Systems, Inc. All rights reserved. 


NO RISK, MONEY-BACK GUARANTEE 


Buying DOCS is risk free because it comes with an unconditional 
six-month money-back guarantee. And all it takes is a simple 30- 
minute installation. 

So if you are looking for the secret to VSE console automation, find 
out what hundreds of our customers already know. For more informa- 
tion on your console automation needs, call 1-800-53-SMART. 
(Outside the U.S., call 214/956-8324.) 


il 


| 


SMARTECH SYSTEMS, INC. 
Turning high technology into SMART TECHnology. 


10015 W. Technology Blvd., Dallas, TX 75220 
FAX: 214/357-6338 Telex: 9102503110 


International Representatives: 
Futurs Systemes et Technologies * Poitiers, France 
Tel: 33-49-01-7374, FAX 33-49-01-7351 
Mycroft Systems, Ltd. * Auckland, New Zealand 
Tel: 64-9-817-7673, FAX: 64-9-817-3640 
Rendeck U.K. Ltd. * Essex, England 
Tel: 44-0702-333555, FAX: 44-0702-333055 
For additional international representative information, 
contact SMARTECH Systems, Inc. 


France: 
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United Kingdom: 
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n EDP Control Audit 


With Teeth 


It Began With An Unltkely Partnership 


partnership between the Internal 
A‘ and Information Services 

(IS) might seem a little like the 
lion lying with the lamb. But this unusual 
partnership was struck between these two 
departments at North Carolina Baptist 
Hospital/Bowman Gray School of Medi- 
cine in Winston-Salem, NC to create an 
effective model for performing EDP con- 
trol audits. 

It was determined that Internal Audit 
and IS really wanted many of the same 
things. For example, both wanted to make 
sure that the information resources of the 
company were being properly managed 
and protected. IS managers have a Duty 
of Trust to ensure that adequate measures 
are being taken to protect the electronic 
data of the company. In like manner, the 
EDP auditor of Internal Audit has the re- 
sponsibility of making sure that this Duty 
of Trust is being honored. 

It is in the best interest of IS managers 
to have the EDP auditor verify that the 
information resources of the company are 
under sufficient control. This verification 
can protect IS managers from legal lia- 
bility in the event of data loss or corrup- 
tion. Successful suits have been filed 
against IS executives for not adequately 
protecting electronic data. For this reason 
it only makes sense that the two depart- 
ments should work together to develop 
processes and systems that effectively un- 
cover control deficiencies. 

The remainder of this article describes 
an innovative model designed to allow 
auditors and data processing managers to 
be more effective in analyzing the suffi- 
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ciency of information resource EDP con- 
trols, thereby measuring their level of 
protection against data processing catas- 
trophes. The audit model was dubbed the 
Clayton Flexaudit, suggestive of some of 
its notable flexabilities that will be de- 
scribed later. 


Describing The Three 
Main Problems 


What Is Control? 


Everyone knows that IS is supposed to 
have adequate control of the company’s 
information resources; however, confu- 
sion looms over the definition of control. 
Diverse data processing backgrounds often 
lead to disparate notions of exactly what 
the term control really means. 

A consistent definition for control is 
needed throughout the entire company if 
an effective control system is to be cre- 
ated and managed. When all players de- 
fine the game the same way, success is 
more likely. This consistency of percep- 
tion will create consistent behavior and 
help everyone to make congruent infor- 
mation control decisions. So the first step 
is to define exactly what information re- 
source control means. 


What Is The Standard? 

The primary objective of any audit is 
to test the performance of some activity 
against an appropriate standard. If it is an 
accounting audit that is being performed, 
the standard against which a company’s 
accounting practices is tested is called 
Generally Accepted Accounting Princi- 
ples (GAAP). A programming and sys- 


tems audit uses the department’s written 
procedures and published standards as the 
yardstick to measure performance. Un- 
fortunately, the EDP control audit usually 
does not have any official standard by 
which information resource controls may 
be measured. So it followed that the sec- 
ond step was to determine what would be 
an effective standard by which informa- 
tion resource controls can be measured. 


How Should The Measurements 

Be Made? 

Typically, control audits are strictly 
qualitative in nature. The auditor devel- 
ops a checklist of what he believes should 
be in place. He interviews IS employees 
and does walk-throughs to check compli- 
ance with his list of rules. He notes fail- 
ures and what needs to be improved. After 
all is said and done, the auditor produces 
a written narrative describing what he 
found. 

There are several inadequacies in this 
approach. First, the auditor has not shown 
why more control is necessary. There has 
been no quantitative measure of need. The 
danger here is that without knowing ex- 
actly how much control is needed, re- 
sources could be wasted in the creation 
of excess controls. The converse danger 
also threatens in that, without knowing 
the goal, it could be easy to fall short of 
enough controls. 

The auditor’s checklist is usually made 
up of some generally accepted principles 
of information resource controls. The 
weakness is in the generality of these 
qualitative measures. Just because some 
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Applications And Their Need For Control 


Privacy 


Application Security 
Payroll H 
General Ledger M 
Chargeback L 


Integrity Avail. Recover. 


practice is good at a few data centers does 
not necessarily qualify it for blanket ap- 
plication in all data centers. 

Finally, such qualitative measures do 
not lend themselves very well to reporting 
improvement or degradation trends over 
time. The only way that this can be done 
is by comparing the items in last year’s 
report to the ones in this year’s and look- 
ing for changes. 


Addressing The Three Problems 


Defining Control 

Control can be described as the effec- 
tive management of information re- 
sources based on the level of need that 
each information resource has for con- 
trol. Therefore, need should be the 
standard for control instead of some 
nebulous idea or textbook checklist. Ef- 
fective control means that the specific in- 
formation resource is neither under-con- 
trolled, which introduces unacceptable risk 
or over-controlled, which introduces un- 
necessary cost. 

This basic definition of control was 
teased apart to discover its individual ele- 
ments. The concept of control was per- 
ceived as being made up of five indi- 
vidual elements. These elements are the 
following: 


* Security: protection of data from 
destruction or unapproved tampering 

¢ Privacy: prevention of unlawful or 
unapproved disclosure 

¢ Integrity: managing the accuracy 
of data 

¢ Availability: accessibility of data 
when it is needed 

* Recoverability: the ability to 
recreate, restore or recover damaged 
or lost data. 


All issues relating to information re- 
source control can be tucked neatly under 
at least one of these five element head- 
ings. Control is made up of these five ele- 
ments and each of these five elements is 
made up of its own special blend of soft- 
ware, hardware and procedures. For ex- 
ample, security software is usually pur- 
chased to control access to the computing 
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resource and specific information. The use 
of this software is usually coupled with 
authorization procedures and an appro- 
priate security organization. These are 
some of the components of the security 
element of control. The other elements 
also have their own component structure. 


Need As The Standard 


Information is being adequately con- 
trolled if each of these five elements is 
present at a sufficient level to fit each in- 
formation resource’s specific need. To 


provide these five elements, the data cen- 
ter and applications functional areas each 
plays a complementary role. The first thing 
that must take place is that the data center 
staff must create an environment replete 
with the necessary software, hardware and 
procedural tools to effect these five ele- 
ments. Secondly, the applications func- 
tional area must then employ the tools that 
are provided by the data center, as well 
as some of their own internal tools, to 
adequately control the information re- 
sources that they are responsible for. 
The auditor should measure the per- 
formance of each of these functional areas 
separately. The environment that the data 
center has created can best be measured 
against an industry standard, adjusted by 
the preferences of the management of the 
company. This functional area is referred 
to as the objective control function. Dif- 
ferent industries have different degrees of 
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Graphic Of Assessment Logic 


The Theory Behind Assessing Element Need And Deficiency 
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Quality Of 


Of The Whole 


Use 2/3 As Much 
As It Should Be 


20% 


Of The Whole 


Reread Deficient At All 
Reread As Good As It Can Be 


Of The Whole 


80% Presence Of Security Components 


Pretending that the three questions above 
represent all the components of security, 
you can estimate what percentage each 
contributes to total security. Then you can 
measure to what degree each component 
is present or deficient to come up with a 
measure for how deficient security is at 
this data center. 


E: 


peesee As Needed Component #1 Of Security 


Fire Alarms? 


Component #2 Security 


Visitor Sign In? 


Component #3 


Door Locks 
And Entry 
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Total Security 


20% Security Deficiency 


Data Center Is 80% Secure 
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dependency on their computing resources 
and, therefore, have different degrees of 
need for objective controls. Financial in- 
stitutions have a high need for control be- 
cause they are so dependent on electronic 
data for day-to-day operations. On the 
other hand, the retail industry is generally 
less dependent and, so, has a lower need 
for control. After a number of quantita- 
tive and qualitative permutations, a stand- 
ard was selected for medical centers in 
general and adjusted for the preferences 
of IS and Internal Audit. Both depart- 
ments decided that the optimum level 
of objective controls would be about 75 
percent. 

The next step was to determine the 
method to test how well the applications 
staff was employing the tools that the data 
center had provided. The most effective 
approach was to test each application at 
the element level; that is, to see how 
well each of the five elements is being 
employed. Security, privacy, availability, 
integrity and recoverability must all be 
present at levels sufficient for each appli- 
cation’s specific needs. 

A little experimentation proves that 
each application has a different level of 
need for each of the five elements of con- 
trol. Figure | lists some typical applica- 
tions and their relative need for each of 
the five elements. 

Once again using need as the standard, 
you can test how sufficient each element 
is relative to the applications measured 
need for each element. This technique en- 
sures that control efforts are focused in 
the right areas. 

For example, if the payroll application 
has a sufficient degree of security, privacy 
and integrity but is lacking in availability 
and recoverability, resources should be 
focused at improving the latter and not 
the former. This strategy protects the 
company against spending money on ex- 
cessive controls, allowing it to get more 
control for its money. 


Coming Up With A Measure 

To apply quantitative measures to the 
assessment, a simple mathematical con- 
cept is employed to the problem. The 
concept simply put means that any item 
is complete only when its parts are com- 
plete. There are two items in the problem 
that have to be measured for complete- 
ness. One is need and the other is suffi- 
ciency. All of the issues that constitute 
need for security, privacy and each of the 
other elements are listed. Then, all of the 
issues that make each of the five elements 
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sufficient are listed. After that, what per- 
centage each item contributes to 100 per- 
cent need or 100 percent sufficiency of 
each element is determined. A graphic of 
this concept is presented in Figure 2. 

A scoring system is created that weights 
each item so that when the maximum score 
is assigned and multiplied by its weight, 
the full potential percentage contribution 
will be produced. When all the weighted 
need scores of each element are added 
together, you come up with a number that 
represents the amount of need each ap- 
plication has for that element. The sum 
of the sufficiency weighted scores tells you 
how much each element is present in the 
application. Survey forms are created to 
perform both the objective and subjective 
portions of the audit. Audit assist spread- 
sheet templates are created to perform the 
calculations and create graphs. 

This technique allows you to set down 
quantitatively the percentage of security, 
integrity, privacy, availability and _ re- 
coverability that each application needs 
and compare it against the measured suf- 
ficiency of each element. The same tech- 
nique is used to measure the sufficiency 


of objective controls. The difference is 
that need is assessed by finding an indus- 
try standard, as described previously. The 
nice thing is that the assessment can be 
presented graphically and improvement or 
degradation trends plotted over time as 
shown in Figure 3. 


Organizational Commitment 
To The Model 


The two departments decided that the 
EDP Control audit should be more than a 
formal annual review to find out who has 
been naughty or nice. EDP controls should 
be integrated into the culture and thinking 
of the IS department. To do this, IS man- 
agers should perform informal self-audits 
as the environment changes and espe- 
cially when new applications are intro- 
duced. This same flexible audit tool can 
be used for these periodic self-audits. 

Internal auditors should also be proac- 
tively involved in the information control 
process. They should periodically target 
applications and functions and test them 
for compliance to the company’s stand- 
ards. This is far more effective than wait- 
ing until the end of the year to attempt 
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Sample Graph Of Control Element Assessment 


Acceptable Deficiency VS. Actual Deficiency Present 
For Application Name 
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The Five Measurable Elements Of Control 


the massive job of evaluating all appli- 
cations and functions. The opportunity for 
thoroughness is greatly diminished when 
the auditor attempts to audit too much 


at once. 


If you have questions, write to the fol- 
lowing address: Clayton Flexaudit, PO 
Box 58, Lewisville, NC 27023. = 
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Program 


Blind programmer uses adaptive 
equipment to perform his daily tasks 


ou are tired of staring at your ter- 
y minal screen. Maybe your eyes 
burn or simply feel strained. So 
you look away for a moment or close your 
eyes to give them a rest. What if, when 
you tried to open them and once again 
look at your screen, you could not see? 
Would you still be able to code, test, read 
and type — or do any part of your job? 
Phil Obregon is a 32-year-old senior 
programmer at the University of Califor- 
nia Irvine Medical Center in Orange, CA. 
He does his job just as any other pro- 
grammer would — except for one differ- 
ence. Obregon is blind. 


Background 


“‘T don’t ever remember seeing,’’ Ob- 
regon recalls. “‘I lost my sight completely 
at two years old due to cancer. I had ma- 
lignant tumors in each eye.”’ 

Obregon started his education at a spe- 
cial school where he learned to read 
Braille. Braille is a system of lettering 
devised for use by the blind in which 
raised dots are read by touch. From third 
grade through college, he attended regu- 
lar school. In college, he studied gen- 
eral educaton with an emphasis on data 
processing. 

His interest in computers surfaced after 
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college when Obregon took a nine-month 
course sponsored by the California De- 
partment of Rehabilitation. “‘I learned 
COBOL PL/1, FORTRAN and Assem- 
bler,’’ he states. 

After completing his schooling, Obre- 
gon began looking for work. “‘I looked 
for almost nine months. I had such a hard 
time. People aren’t aware that blind peo- 
ple can do a job. My biggest problem was 
having to sell myself to employers,’’ he 
explains. 

There was one incident with a potential 
employer that sticks out in his mind. 
““Everyone who interviewed me at this 
company recommended that I be hired. 
But someone in upper management had 
worked with a blind person who had not 
been productive. Through politics, I was 
not hired,’ Obregon remembers. 

The brick wall that Obregon came up 
against during his interviews is what he 
calls the fear factor. ‘*1 would always be 
asked, ‘Do you need Braille equipment?’ 
I was amazed at how many companies 
said thanks and referred me to others who 
would be able to buy the equipment they 
thought I needed. I don’t need special 
equipment purchased for me. I can use 
the standard terminal that everyone else 
uses. And I can program like anyone 
else,’ he points out. 


The Optacon 


What Obregon does use is a different 
means for his programming. “‘I already 
have what I need to do the job,’” he con- 
tinues. ‘‘It’s a different medium but the 
end result is the same. It is a tactical me- 
dium — a small, electronic device called 
an Optacon.”’ 

The Optacon from Telesensory Sys- 
tems (Mountain View, CA) is actually an 
array of pins and a small camera. “‘I run 
over any piece of printed material and the 
image is transferred over the array of pins. 
For example, if I am holding the Optacon 
over the letter ‘A’ it will give me a raised 
image of the letter ‘A’,”’ Obregon 
explains. 

“‘T purchased the Optacon II a couple 
of months ago. Compared to the original 
Optacon, it is a little smaller only weigh- 
ing two pounds and it has one battery. It 
can be directly connected to a computer 
and does not have to be hand-held. I use 
it at work and have the older model at 
home. My top speed is probably between 
90 and 100 words per minute. But many 
times I am not actually reading, I’m just 
scanning printouts for specific informa- 
tion,’ Obregon points out. 

The Optacon II converts print or com- 
puter output into an enlarged, vibrating 
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tactile form. To read print, Obregon would 
move the camera across a line of print 
with one hand. The index finger of the 
other hand is placed on the Optacon’s tac- 
tile array, which is approximately one inch 
long and a half inch wide. As the camera 
is moved across the letter, the Optacon 
sends a letter electronically and the 
image is simultaneously reproduced on the 
tactile array by vibrating rods. Obregon 
is able to perceive the vibrating image 
with his index finger. Any graphic image 
viewed by the camera or received elec- 
tronically is perceived by the user. The 
Optacon is not limited to reading let- 
ters only. 

‘Besides the device I use, there are 
other devices,” Obregon continues. ‘‘One 
of the big things today is a speech syn- 
thesizer. By hooking up the synthesizer to 
computers, you can get voice output in- 
stead of tactical output. It puts the words 
together and tells you what’s on the 
screen.” 

‘‘T have another Telesensory Systems’ 
product called Vert Plus,” he says. Vert 
is synthetic speech output that works with 
IBM PCs and most compatibles. It can be 
instructed to read whole words and num- 
bers or to announce each letter and num- 
ber individually while sounding like a hu- 
man voice. 

‘A lot of people use strictly speech. I 
have not been using it very long so it is 
slow for me. I need to take time to learn 
it. Speech is supposed to be a lot faster 
because you are just reading straight text. 
But with programming you are not really 
reading every character. Even in manuals, 
I just look up certain things and don’t read 
the whole book’’ Obregon explains. 

‘It is easier for me to just pick up my 
Optacon. I know what I want to see and 
go right to it. With speech, you have to 
learn how to navigate. However, the Op- 
tacon is tiring because I have to hold the 
camera up to the screen all day long. 
Someday, I will have to switch to speech. 
It would be less tiring. But I will never 
give up the Optacon because it gives me 
the freedom to read anything — mail, 
newspapers, magazines,”’ he says. 


The Job 


It took Obregon nine months before 
he got his first job at the University of 
California Irvine Medical Center as a 
programmer in 1979. Richard Sechrest, 
Director of the Information Systems De- 
partment, recalls hiring him. “‘It was a 
complete unknown to us. And just like 
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any difference, there was some reluctance 
in hiring him. I hired him right from 
school and I was assured by the institution 
that he was good. It was an entry-level 
position so I took a chance. Phil is an 
extremely accomplished technical indi- 
vidual,’’ Sechrest states. 

Obregon explains, *‘I have the same 
job description and responsibilities as any 
other applications programmer.’ He works 
in a DOS/VSE environment on an IBM 
4381. He uses DYL-280-II, a 4GL from 
Sterling Software’s Dylakor Division 
(Chatsworth, CA), along with the Opta- 
con for 95 percent of his programming. 

Jim Thompson, principal programmer 
at the University of California Irvine 
Medical Center, comments, ‘*I’ve worked 
with Phil eight years or so. He is very 
good at what he does. Basically, his du- 
ties are the same as mine. We program, 
do user requests, reports and new sys- 
tems. I use my eyes and he uses his Op- 
tacon. There’s no difference.” 

According to Sechrest, Obregon spends 
a lot of his time maintaining and changing 
payroll applications. ‘‘There are so many 
different unions, regulations and policies 
as well as eight different employee groups, 
resulting in the payroll programs con- 
stantly changing.” 

‘*Phil is one of the sharpest technicians 
here,’ Sechrest continues. “‘He has a fan- 
tastic memory and can remember things 
he worked on years ago. We had a pro- 
grammer here who left a mess. Phil re- 
wrote all of the programs in one-tenth of 
the time it originally took to program.”’ 

“In my experience, I would not be re- 
luctant to hire another handicapped per- 
son. And we don’t give Phil special treat- 
ment. He is a rare and unique individual,’’ 
Sechrest adds. 

Obregon explains, “‘With DYL-280-II, 
a lot of the batch programming is auto- 
matically generated. For example, for re- 
port layouts you tell it which fields you 
want to print, the order and specific col- 
umn headings and it will automatically 
generate the print line and calculate spac- 
ing and centering. With COBOL, all of 
this would have to be coded and it would 
take a lot longer. DYL-280-II cuts pro- 
gramming time way down and that is the 
biggest reason I use it.”’ 

‘“With COBOL, I would have to write 
my own routine to read a record, see which 
is higher or if the record matches. DYL- 
280-II has automated this. You give the 
keys you’re looking for and if one file 
doesn’t have a matched record, you give 


the specifications and let DYL-280-II 
generate the code for you. I just worry 
about manipulation without worrying 
about a read or write,’” Obregon adds. 


Not Just A Programmer. . . 


Obregon starts his day by most peo- 
ple’s standards at about 4 a.m. “‘’m a 
morning person. I workout first thing to 
get my blood circulating,’ he explains. 

He lives in a condo and takes the bus 
to work. “‘I have a cane that I carry in 
front of me. It encounters objects before 
I do and when it doesn’t work, it’s usually 
my fault,” Obregon continues. 

When Obregon is not working and not 
playing games on his PC at home, those 
who know him will tell you he has most 
likely gone skiing for the weekend. ‘‘I 
prefer downhill skiing to cross-country 
but I’ve done both,’ he says matter-of- 
factly. “‘I also water ski but haven’t done 
it in years.”’ 

He started skiing about five years ago 
with his brother. Presently, he skies on his 
own and through the National Handi- 
capped Sports and Recreation Associa- 
tion. “I have someone skiing behind me 
giving me directions. There are other 
techniques you can use. Blind racing 
skiiers will have guides in front of them. 
I try to plan trips at least twice a year — 
locally at the Mammoth Ski Resort as well 
as up in the Sierras,’ he adds. 

“*T love it,’ Obregon says. “‘It is such 
a free feeling. Being blind, I don’t get 
that feeling with running, although I ran 
in high school and college. You have to 
hold on to someone the whole time.”’ 


In Conclusion 


” 


“The technology is here,’ Obregon 
states. ‘‘I want to let the world know that 
the technology is available for me to do 
the exact same job that a sighted person 
can do. The only difference is how I 
get the information from the screen to 
my brain.” = 
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ost VSE-to-MVS_ conversions 
involve outside services or soft- 
ware. BancPLUS Mortgage 


Corp. in San Antonio, TX chose a some- 
what unique method for its conversion — 
REXX. 


The Decision To Convert 


“We are a large CICS shop,”’ explains 
Charles Lee, Technical Support Manager 
at BancPLUS Mortgage Corp. **We nor- 
mally process 200,000 transactions a day 
and we were up against the limits of VSE. 
The decision to move to MVS was made 
in order to overcome the VSE storage and 
I/O constraints.” 


John Deptula, Senior Vice President of 


MIS, relates, ‘“When VSE started to ex- 
perience some degradation, we knew we 
would have to upgrade our CPU or con- 
vert. It was cheaper to convert. 

“One of the difficulties to overcome 
was trying to relate the benefits of a con- 
version to MVS to upper management. 
The easiest way to explain the need was 
that users were not getting their reports 
on time every day and there was not al- 
ways a sub-second response time for CICS 
as there had been in the past.”’ 

‘*Plans for the conversion began in No- 
vember 1987 on an informal basis,’’ Lee 
remembers. ‘‘We put a plan in place 
around February 1988 and made the 
final decision to go with the conversion 
in May.”’ 
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“‘When we first started on this path, 
there were several options,’ Deptula says. 
‘“We could hire an outside firm to do the 
conversion, buy a turn-key conversion tool 
that an outside company would provide, 
buy the conversion tool from IBM or 
do everything ourselves. IBM did pro- 
vide an SE to help with planning and 
coordination.” 

Lee had used REXX as a prototype lan- 
guage prior to the conversion decision. 
“Writing large programs in Assembler 
takes a lot of time. With REXX, we can 
prototype programs or a series of pro- 
grams within a short period of time. We 
use CMS for program development and 
submitting JCL for execution. We looked 
at several conversion packages but didn’t 
find any that would properly convert our 
CMS job flow and include file com- 
mands,’’ he recalls. 

Deptula comments, ‘‘We are all VM 
bigots here. We wanted to stay with VM 
because there are a lot of benefits to us 
internally. All of our applications person- 
nel were familiar with VM and REXX. 
VM is a great product and you don’t have 
the overhead of TSO. 

‘*After looking at the presentations, we 
found that our best course of action was 
to use REXX. After a small test of that 
technique, we found it to be pretty suc- 
cessful. Besides the experience we would 
gain from doing the conversion ourselves, 
we wouldn’t have to pay high fees to an 
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outside firm. We would come out far bet- 
ter and control the conversion a lot better 
using REXX.”’ 


Why REXX? 


“‘T had quite a bit of experience with 
REXX,”’ Lee explains. ‘*‘I had written a 
number of procedures to help monitor the 
system and help the applications pro- 
grammers. For example, to compile a 
program, you just say ‘compile’ and a 
REXX EXEC adds the necessary job con- 
trol statements to the COBOL source pro- 
gram and submits the job to VSE or MVS 
for execution.’ 

On a whim, Lee put together a proto- 
type EXEC to convert a job stream. ‘‘I 
was surprised at the speed. My original 
thought was once the prototype was done 
in REXX and I had the logic down, I 
would convert it to Assembler. After 
watching it run, I didn’t need to do that 
and continued development in REXX. The 
basic conversion routines were completed 
in a couple of weeks. 

**Because REXX is an interactive, high- 
level language, it was easier to change 
than COBOL or Assembler would have 
been. It has a lot of facilities embedded 
in the language which makes it pretty easy 
to do some complex routines. This was 
the most surprising element of using it. I 
could convert a 1000-statement job stream 
in 15 to 20 seconds. 

‘*For the conversion process, I had to 
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use three distinct facilities. The first was 
a procedure to make technical adjust- 
ments to the CICS programs. During 
the migration, we went from CICS 1.6 
toxigts 

There was one procedure to make mod- 
ifications to the COBOL source pro- 
grams, which took about 600 lines of 
REXX code. There were six procedures 
to scan and modify the JCL. It took 1500 
lines of REXX code for the JCL mod- 
ifications. 

Lee states, ‘‘It would have taken a lot 
more lines of code and many more man 
hours to develop these procedures with 
Assembler. You can do an enormous 
amount of work with one REXX state- 
ment, while it would take hundreds of 
lines of Assembler code. It packs a pretty 
powerful punch. 

“The price you pay for this is speed. 
REXxX is slower than any compiled lan- 
guage would be. Depending on how a 
program is written and what its function 
is, REXX can be so slow that it is unac- 
ceptable. However, we did not run into 
this problem. 

‘*The key element of the conversion was 
to go with REXX. If we would have done 
it any other way, it wouldn’t have come 
out the way it did. And with REXX, it 
took less than 200 hours of manpower to 
develop the basic procedures.’ 


Preparing For The Conversion 


In January 1988, BancPLUS Mortgage 
Corp. installed a 3090-120 E running VM/ 
XA SF and VSE Release 1.3. Previously, 
a 3083 had been running VM/SP since 
1981. ‘‘By installing the 3090, we were 
positioning ourselves for an MVS con- 
version if needed,’ Lee states. By early 
July, the initial MVS system was in- 
stalled. The department has 20 applica- 
tions programmers and four technical 
support people. Ninety-nine and nine- 
tenths percent of the programs are written 
in COBOL. 

Lee relates, ‘‘We spent from that July 
through December familiarizing our tech- 
nical support group with the system. We 
didn’t have 100 percent understanding of 
some facilities we were getting in MVS. 
None of us had any experience with MVS 
so it was a brand new world for us. After 
it was installed and we saw how it really 
worked, there were some pretty signifi- 
cant adjustments to be made. Having 
written the conversion procedures in 
REXX allowed us to make these adjust- 
ments quickly. 


TSO/E REXX 


“‘One life saver was getting the MVS 
Express system from IBM. Express is a 
marketing tool that IBM uses. It is a pre- 
generated version of MVS tailored to your 
installation’s hardware configuration. We 
installed it at 9 a.m. and had it running 
by 11 p.m. We had to do a lot of refine- 
ment after it was installed, but it was a 
good base system. It cut two months from 
the technical support staff’s effort.’’ 

In January 1989, the applications pro- 
grammers became involved in the con- 
version process as well. ‘‘The technical 
support staff ran the EXECs to convert 
the COBOL source programs,’’ Lee ex- 
plains. ‘‘They also converted the JCL and 
modified what the EXECs didn’t process 
properly. Then the applications staff ran 
the EXECs to convert the JCL and modify 
any statements the EXECs did not process 
properly. Last, the programs were tested 
to make sure they functioned the same 
under MVS as VSE.”’ 

This time was also spent ordering and 
installing third-party vendor products. 
These include CA-ONE, a tape library 
management system from Computer As- 
sociates International (Garden City, NY), 
The Monitor, a CICS peformance monitor 
from Landmark Systems (Vienna, VA) and 
FAVER, a backup/restore facility from 
Goal Systems International Inc. (Colum- 
bus, OH). 

‘*We first had FAVER under VSE. For 
compatibility we felt this product best fit 
our needs for VSAM file migration. We 
also have VMFM, a VM product from a 
local company, Cestrian Software. This 
product helped us quite a bit with the con- 
version process, in conjunction with 
REXX, in managing CMS files and dis- 
play panels. It is a product that comple- 
ments some of the VM/CMS facilities and 
offers a variety of functions including a 
CMS file processor and panel manager. I 
used it quite a bit for panel definitions on 
EXECs,’’ Lee says. 

About five percent of the JCL changes 
were done manually. Lee points out, 
‘‘Computer Associates’ System Manager, 
which we were running under VSE, in- 
cludes facilities to allow ‘Go To’ state- 
ments in JCL. MVS doesn’t have those 
facilities so the biggest part of the man- 
ual changes were to alter the structure 
of the JCL logic and to accommodate 
the differences in tape and DASD file 
management.” 

“IBM suggested Xamo, a conversion 
assistance migration offering, which was 
a six-month extension of the normal two- 


month test allowance,’ Deptula says. ‘‘We 
didn’t want the double software costs of 
both VSE and MVS. With an eight-month 
window, we wanted total control of the 
conversion and we wanted to get it done. 
The key to the whole conversion was 
planning. That is what really helped make 
it successful.’’ 


IBM’s Involvement 


““We wanted someone from the outside 
questioning what we were doing,’’ Dep- 
tula says. ‘‘Jose Kypuros, an IBM SE, 
was our check and balance.’’ 

Kypuros explains, ‘‘I was there to ov- 
erview. Charles and I came up with a 
schedule and we made sure we stuck to 
it. My task was to supply information 
when problems came up.”’ 

Kypuros says he used a lot of his IBM 
experience for the different areas of the 
conversion. ‘*I went to school for VSAM, 
POWER to JES, VTAM and CICS. If I 
saw something being done wrong during 
the conversion, I would explain how MVS 
works and why it should not be done that 
way. I also emphasized the differences 
between VSE versus MVS.”’ 


The Conversion 


Deptula comments, ‘“‘Each MVS con- 
version is the same but it is unique. With 
REXX, we could handle it better. We 
started it on a Saturday morning and had 
the whole conversion done by Sunday. 
With someone else’s tool, we could not 
have done it in that time frame. 

““We didn’t want our users to be af- 
fected by the conversion. The goal was 
to have VSE running on Friday and MVS 
up and running on Monday with the only 
difference being improved response time. 
We didn’t change any applications during 
the conversion unless it was absolutely 
necessary in order to run under MVS.”’ 

There were three weekend dates that 
were choices for the conversion time. Ac- 
cording to Deptula, ‘‘Normally, work is 
done on Saturdays so in order to do the 
conversion, production would have to shut 
down. April 8 was chosen, knowing that 
if it did not work, April 15 or 22 could 
be used to try again. 

““We had several ‘go, no-go’ check- 
points during the conversion. By Sunday 
evening, we reached the last checkpoint 
and jointly decided that everything, from 
our viewpoint, was problem-free. We then 
cut over to MVS,’’ Deptula points out. 

On Monday, the only problem .was slow 
response time. By Tuesday, it was back 
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to sub-second response. ‘‘We did not tune 
anything on MVS until it was up and run- 
ning and we could see what was slowing 
it down,’ Deptula adds. 

“We also had one CICS problem,’’ Lee 
adds. ‘‘An application had not been con- 
verted properly. We also encountered a 
few JCL errors when running some of our 
batch jobs. But ever since the first week, 
MVS has been solid.”’ 


Benefits Of The Conversion 


‘*After the conversion, we had a ses- 
sion with the users,’ Deptula says. While 
it was difficult to explain the benefits of 
MVS, the benefits of getting reports on 
time could be demonstrated. *‘We met our 
goals of having a ‘transparent’ conversion 
and management was very pleased with 
the conversion.” 

‘*Batch runs have improved astronom- 
ically,’ Lee says. ‘‘We used to leave CICS 
up until 8 p.m. and were pretty pinched 
to get the production cycle run by 7 a.m. 
the next day. And we would run over at 
month-end. Now, we finish production 
between 3 and 3:30 a.m. CICS response 
time is approximately the same as before 
the conversion.” 

The system and applications are now 
being tuned for the MVS environment. 
He continues, ‘‘We took our VSE appli- 
cations and brute-forced them into MVS. 
We can’t expect them to run at their op- 
timum. But not trying to redesign them 
during the conversion was one key ele- 
ment to our success.” 

‘Using REXX for the conversion pro- 
vided a tremendous benefit because we 
learned so much more about our operation 
that we had taken for granted over the 
years,’ Deptual says. ‘‘We found some 
jobs that should not have been running 
the way they were. We were able to see 
how certain things operate and identify 
what was not smart and how we could 
run a job a better way.” 

“The biggest problem with conver- 
sions is either there is a poor job of plan- 
ning upfront or there is a real good job of 
planning but those involved don’t stay 
with the plan,’ comments Kypuros. ‘“The 
eagerness of BancPLUS toward staying 
on their schedule made them an MVS shop 
quickly and cleanly.’= 
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Problems: 


My current DOS/VSE online editor will not be enhanced or maybe 
even supported on future releases of VSE. 


The functional, recovery, performance and difficulty of use problems 
we are experiencing with our current editor must be addressed. 


We’re an MVS shop and TSO’s resource consumption limits the 
number of users who can have access to ISPF and JES. 


We’re currently DOS/VSE considering a conversion to MVS and 
would like to acquire an online editor which provides compatibility 
across both systems. 


Solution: Bim-epit—online Editor System 


Whatever current problems exist with your online editing system, here are just 
a few of the many reasons BIM-EDIT can provide solutions. 


¢ Can be run in its own partition or as a CICS subtask. (DOS) 


¢ Single region implementation. Should support 4 times as many users as ISPF 
using similar system resources. (MVS) 


Concurrent access from multiple CICS’s or directly from VTAM. (DOS and MVS) 


Up to 9 concurrent BIM-EDIT sessions per user in any mode. Rotate between 
them via a PF or PA key. 


Users can logoff without ending sessions and sessions are preserved. 

Stack area provided to facilitate moving text within and between members. 
e A powerful easy to use procedure language. 

BIM-EDIT commands and procedures can be assigned to PF or PA keys by user. 

Full function Electronic Mail System. 

Automatic disk space compression. 

Inbound/Outbound screen data compression for optimum response times. 

Recovery after system failure is totally automatic and takes place in seconds. 


Fast backup and restore feature. Most all functions, including editing, are 
available while backup is running. 


Cross address space operation. (DOS and MVS) 
e Access to POWER and JES spooling queues. 
e Online access to DOS/VSE/SP libraries and members, OS partitioned data sets. 
e Conversion programs provided to replace ICCF, OWL and PANVALET. 
Interfaces to RACF, ACF2 and TOP SECRET. 


Here is what two BIM-EDIT users recently said about BIM-EDIT: 


““BIM-EDIT is by far the best editor | have ‘We have had BIM-EDIT installed for just 
ever used, no other editor on any operating over two years now, and | must Say it is the 
system is more powerful or flexible.’’ best editor we have used.”’ 

PETE CLARK, Olan Mills JIM MORRIS, INSERV, Inc. 


Besides being the most powerful and flexible online editor available, BIM-EDIT 
is reasonably priced at $6400/DOS $12000/MVS permanent license, $3200/D0S 
$6000/MVS annual lease or $320/DOS $600/MVS monthly rental. 


B | Moyle Associates, Inc. has been dedicated to providing cost effective software 
solutions, which improve system performance and user productivity, for 10 years. 


For more information on BIM-EDIT, or any of our other quality software products 
and services call Jim Kingsbury at 612-933-2885 today. 
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5788 Lincoln Drive 
Minneapolis, MN 55436 


612-933-2885 
Telex 297 893 (BIM UR) 


Member Independent Computer Consultants Assn. 
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Computers are really about time. Often 
we forget about their single most important 
feature-the saving of time. Millions of hours are 
saved annually by computers. Yet nothing strikes 
fear more than the possibility of losing time by 

downtime. 

The instant you experience a data loss, 
you begin losing precious minutes. Pressure 
builds as the clock ticks by. Without data 
protection, time is needed to reconstruct or 
salvage your files—time that costs you money. 


If the data cannot be recovered, the time to 
reenter thousands of transactions isn’t the only 
time consumed. Your DP center's work flow 
is disrupted when data entry is squeezed in 
after hours into already tight schedules. Your 
organization depends on your data to make 
decisions, pay its payroll, keep its records and 
plan for the future. 

Even if you've never experienced a data 
loss, now is the time to discover the recovery 
services you'll have with Softsystems. We are the 


SOFTSYSTEMS wc 


300 Mallick Tower, One Summit Avenue 
Fort Worth, Texas 76102 
800°331°7846 — 817°877°5070 
Canada 800-367-8673 


industry’ innovative leader in data recovery. 
Development Specialists are available 24 hours 
a day to insure youre down as little time as 
possible. Softsystems has the recovery program 
to meet your needs. JPU/E-Journal Processing 
Environment, SJS-Second Journal System and 
JPU/A-Journal Processing Archiving. 

Time spent today with Softsystems will 
save you time and make sure your system has 
the best data protection. After all, in computers 
more than anything else, time is money. 


Systems for CICS Environment, VSE, VSE/SP, VS1, MVS, MVS/XA and MVS/ESA Installations 
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DASD Farm’ 


How Does Your 
Garden Grow? 


By A. L. Jones 


ular in the DP industry today to refer 

to the collection of Direct Access 
Storage Devices in a DP shop as the 
DASD farm. For most installations, this 
label is quite appropriate. The typical 
DASD farm continues to grow and grow 
and grow — and it does not even need 
water! The total acreage is increasing, but 
how about such factors as the acres in 
production, the yield per acre and the 
value of the crop? Will current directions 
toward crop rotation help? This article 
takes a tongue-in-cheek look at some of 
these issues and may present some sur- 
prises for fellow 4H (Hollerith, Hollerith, 
Hollerith & HAL) club members. 

“Today, large processor complexes are 
experiencing capacity growth of 30 to 40 
percent per year in their DASD farms.”’ 
This quote exemplifies the current per- 
ception of storage directions within the 
DP industry. But is this projection true? 
Or, perhaps more appropriately, should 
this projection be true? 

While the following information is not 
a complete and detailed evaluation of these 
questions, it is a preliminary evaluation 


[ has become fairly standard vernac- 
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based on a somewhat unconventional 
method of looking at DASD utilization. 
Most studies of DASD usage evaluate sta- 
tistics and trends relating to the allocation 
of DASD (a land-use survey). An added 
perspective addressed here is the produc- 
tivity of DASD (a crop-production sur- 
vey). The scope of this evaluation is not 
broad enough to be viewed as definitive, 
but I sincerely hope that a consciousness 
regarding DASD productivity will be 
raised and that additional, more scholarly 
studies of this subject might be prompted. 

Just for fun and in recognition of com- 

mon reference to DASD farms, I will fre- 
quently make use of ‘‘agricultural’’ lan- 
guage. Since most DP personnel are 
citified, the following basic definitions of 
the language are offered: 

* Farm — the collection of direct ac- 
cess storage devices at a DP instal- 
lation; this may include standard 
rotating DASD, cached DASD 
and Solid-State Disk (SSD) storage 
devices 

* Section — a subset or subdivision of 
the farm; this might be a particular 
device-type subsystem or simply a 


portion of the farm that exhibits cer- 
tain characteristics 

* Acreage — the number of megabytes 
(MB) or gigabytes (GB) of storage 
space associated with a farm or a 
section 

* Crop — the unit of production asso- 
ciated with I/O subsystems, namely, 
input or output operations (I/Os) 
processed to or from storage 

* Yield — the amount of crop (or num- 
ber of I/Os) produced; this may be 
related to time (I/Os per second) or 
space (I/Os per acre). 


The results presented are based on the 
evaluation of several DP installations and 
should represent common DASD farms. 
They may or may not reflect the charac- 
teristics existing at another specific in- 
stallation. 


The Farmer’s Almanac 
And Others 


The MVS DASD usage survey con- 
ducted in 1988 by IBM and detailed in 
the IBM Technical Report, December 
1988, is perhaps the most authoritative 
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and complete evaluation of DASD usage 
characteristics and trends in print today. 
It is based on data obtained from 106 par- 
ticipating computer installations. The re- 
port contains a wealth of valuable infor- 
mation, but only a few key findings in the 
IBM report pertain to the topic and lim- 
ited depth of this article. These include 
the following: 

¢ The median total DASD capacity on- 

line was about 150GB 
¢ The median number of datasets on- 
line was about 23,500 

« Average overall DASD space alloca- 
tion was 67 percent; average alloca- 
tion for 3380A-, D- and J-type DASD 
was 69 percent while average allo- 
cation of 3380E-type DASD and 
3380K-type DASD was 67 percent and 
60 percent respectively 

¢ Of all datasets, 72.4 percent are se- 
quential and these account for 44 per- 
cent of allocated space 

¢ SYS1 datasets account for 2.1 percent 

of the datasets and use 6.7 percent of 
the DASD space, on average 

¢ About 40 percent of all datasets had 

not been referenced in 15 days and 
these accounted for about 20 percent 
of the allocated space 

¢ Between 1984 and 1988, the amount 

of installed DASD gigabytes has more 
than doubled 

¢ ‘There has been no significant change 

in the last eight years in the percent 
of DASD volume space that is allo- 
cated to datasets.”’ 

The IBM report discusses past and pre- 
sent characteristics of DASD utilization 
but does not project future trends. The 
1988 DISK/TREND Report does, how- 
ever, and the projected growth in ship- 
ment of new storage capacity alone is 23, 
25 and 23 percent respectively in the years 
1989, 1990 and 1991. A projection such 
as this tends to confirm the opening quo- 
tation of this paper. DASD capacity growth 
has been significant (around 20 percent 
per year) during the most recent years 
and is projected to continue in the im- 
mediate future. 


Land Use VS. Crop Production 


The problem with studies such as those 
discussed is that they evaluate only the 
instantaneous allocation characteristics of 
a DASD farm. They are primarily based 
on Volume Table of Contents (VTOC) 
snapshots taken at DP installations and 
simply reflect the allocation and distri- 
bution characteristics of volumes and da- 
tasets existing at the time of the snapshot. 
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DASD 


They are the DP equivalent of,a land-use 
survey by the USDA — they identify the 
acreage available, the acres planted and 
the acreage devoted to various crops. They 
do not, however, evaluate the way in 
which the allocated space (or acreage) is 
used for I/O activity (or crop production). 

The statistics generated by traditional 
studies can be misleading. An average 
space allocation of 67 percent is reported, 
but the unstated impression is that this 
space is permanent allocation and that the 
remaining space is used in varying de- 
grees by temporary (short-term) space re- 
quirements. What is not clearly stated is 
that the reported space allocation includes 
all non-permanent datasets in existence 
and on-line at the time that the: VTOC 
snapshot is taken for an installation. The 
reported space allocation might very well 
be the highest space allocation for the day, 
the week or even the month depending on 
the specific time that the snapshot was 
taken. The statistics relating to the aver- 
age number of datasets can also be dis- 
torted in a similar fashion by the presence 
or absence of non-permanent data at the 
time of the snapshot. 

My contention is that the only way to 
truly evaluate the effectiveness of a DASD 
farm is to evaluate the utilization and pro- 
ductivity (yield) of the acreage over time. 
A crop-production survey is required to 
clarify and refine the results of a land- 
use survey. 


Survey Implementation 


In order to establish a foundation and 
framework for a crop-production survey, 
it is necessary to understand the basic land- 
use characteristics at a specific farm. 
Packages which will perform the required 
analysis are available from several ven- 
dors. At StorageTek, three proprietary 
packages are employed which are avail- 
able to our current and potential cus- 
tomers at no charge: SYBIVTOC, 
ACSDASD and CPIO. 

SYBIVTOC essentially performs the 
function of VTOC analysis. In short, this 
package accesses all DASD devices which 
are on-line at the time of execution and 
summarizes the allocation and dataset 
count statistics for an installation by de- 
vice type and dataset organization. 

ACSDASD analyzés the last-reference 
date for datasets at an installation. The 
program presents an aging distribution re- 
port of dataset count and total tracks by 
dataset organization based on the last-ref- 
erence date found relative to package ex- 
ecution time. 


The newest part of this study is eval- 
uation of the productivity of the DASD 
acreage over time. The CPIO software 
provides this function for any appropriate 
period of processing at a DP shop (usually 
one to two weeks). The CPIO software 
package is based on the concept of cost- 
per-I/O analysis and analyzes I/O activity 
(as recorded in SMF record types 4, 14, 
15, 17, 34 and 64) for each dataset ref- 
erenced during the analysis period. Using 
the characteristic of throughput density 
(which is the average I/O/second/MB for 
the dataset) and observed dataset usage 
characteristics (frequency of access), each 
permanent dataset is suggested as a can- 
didate for a specific device-type which is 
the most cost- and performance-effective 
media for the dataset. Device candidates 
include expanded storage, solid-state disk, 
cached DASD, high-performance DASD 
(3380J, single-capacity), high-capacity 
DASD (3380K, triple-capacity) and car- 
tridge subsystems. 

The evaluation of DASD space produc- 
tivity was not the original intent of this 
software package, but it serves well to 
accomplish the desired function since all 
datasets are individually evaluated and as- 
signed to device-type categories which re- 
flect various levels of I/O activity inten- 
sity (throughput density). Several different 
criteria are applied to the selection of spe- 
cific dataset candidates for each device 
type but, for simplicity, the following 
interpretations and labels will be used for 
the presentation of the following results: 

* Expanded Storage (ESTOR) and 

Solid-State Disk (SSD) candidates 
represent high activity storage — the 
classification of V-HI will be used in 
subsequent results 

* Cached DASD (CACHE) and High- 

Performance DASD (HPDASD) can- 
didates represent high activity storage 
— the classification of HIGH will be 
used in subsequent results 

* High-Capacity DASD (HCDASD) 

candidates represent moderate activ- 


ity storage — the classification of 
AVG. will be used in subsequent 
results 


* Automated Cartridge System (ACS) 
candidates represent low activity se- 
quential storage — the classification 
of LOW will be used in subsequent 
results. 

Non-permanent datasets are tracked for 
high-water-mark space utilization and 
reported separately in three categories 
including SORTWORK temporary data- 
sets, non-SORTWORK temporary data- 
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EMC's ORION: 


The Cost-effective Solution to 
Your I/O Performance Problems. 


EMC's ORION Solid State Disk Subsystem 


Maximum Performance 


EMC's ORION is the fastest solid state disk subsys- 
tem available for your mainframe computer. ORION 


features a technologically advanced de- 
sign enabling you to receive unprece- 
dented performance gains. 

An integrated 3880 type storage di- 
rector, in addition to features inherent 
in solid state technology, gives ORION 
an access time of 0.1 millisecond — a 
performance milestone. 

What's more, EMC protects your in- 


vestment by making ORION compatible 


with all IBM 370 and IBM PCM com- 
puters. Therefore, performance boosts 
are realized well into the future, when 
CPU upgrades become necessary. 


EMC's ORION — the I/O solution you 
have been waiting for to maximize your sys- 


tem's performance and productivity. 


Minimum Price 


ORION: High Performance/Low Cost 
ORION 


a 
So 
o 


Rotating DASD 


Average I/O per second 


30 


EMC 


The System 
Enhancement Company. 


IBM isa registered trademark of 
International Business Machines Corp 
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EMC's ORION Solid State Disk Subsystem is the low- 
est cost solid state solution to your I/O performance 


problems. Its state-of-the-art design 
gives you a substantial return on your 
investment for years to come. 

ORION's small footprint and low 
power requirements eliminate costly 
computer room renovations. Ease of 
installation and low cost of ownership 
make ORION an expedient and eco- 
nomical solution to your I/O perfor- 
mance problems. 

EMC's ORION — the most econom- 
ical performance boost for your current 
and future mainframe systems. 


For more information, call: 


1-800-222-EMC2 
In Mass., call (508) 435-1000 


Copyright 1988 EMC Corporation 
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Configuration & Utilization Summary 
(A Modified Land-Use Survey) 
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sets and transient (deletable) datasets with 
permanent DSNames. Non-permanent 
space usage is reported separately by the 
analysis software and will be treated sep- 
arately in the remaining sections of this 
article. 


Survey Results 


The survey results included here are 
derived from a detailed activity analysis 
for several days of data at eight computer 
installations. The installations which are 
included are geographically dispersed and 
represent the following industries: tele- 
communications, manufacturing, public 
utilities, banking, retail stores, grocery 
stores, engineering and oil production. 

The results should not be considered to 
be conclusive since they are based on the 
detailed evaluation of only eight com- 
puter installations; however, it is felt that 
they do represent a viable preliminary 
evaluation. Partial evaluations for per- 
haps 20 additional DP installations were 
reviewed but the absence of one or more 
key data elements precluded the incor- 
poration of these partial findings; how- 
ever, it is worth noting that even the par- 
tial results agreed, fundamentally, with the 
detail findings. 


A Modified Land-Use Survey 


Figure | presents a configuration and 
utilization summary derived from this 
survey. It is interesting to observe how 
closely the average DASD acreage and 
the average percent of space allocation 
(which is equivalent to the acres planted 
or seeded) agrees with the averages re- 
ported in the IBM DASD survey. Survey 
installations exhibited an average size of 
153.7GB while the IBM survey showed 
150GB. Our survey showed an average 
allocation of 70 percent while the IBM 
survey showed 67 percent. If nothing else, 
this closeness of results should indicate 
that the installations included in this sur- 
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(acres planted) 


% Allocation % Utilization 


(acres producing) 


vey are representative of larger popula- 
tion averages. 

The modification (or addition) this sur- 
vey makes to the common DASD usage 
survey is the inclusion of a measure for 
the percent of DASD space actually used 
for I/O (crop) production. The **% Uti- 
lization’’ shown in Figure | is equivalent 
to a measure of the acres actually pro- 
ducing crop over the analysis period at 
each installation. 

The percent of DASD space actually 
used for I/O processing at each installa- 
tion in this survey varied from a low of 
32.5 percent to a maximum of 62.8 per- 
cent and averaged 47.8 percent. It is fully 
recognized that I/O to SYS1 datasets is 
not reflected in the SMF data used by the 
analysis software but, even if average 
SYS1 space usage (as reported in the IBM 
survey) is added to this figure, the total 
is still just over SO percent. 


An Evaluation Of Yield Per Acre 

Figure 2 presents an analysis of I/O ac- 
tivity to permanent datasets (which by def- 
inition, in the software used, is simply 
those datasets not deleted during the anal- 
ysis period). The acres (GB) used by these 
permanent datasets are subdivided into 
sections of activity classification based on 
the concept and definitions described ear- 


lier in Survey Implementation. The results 
for each classification vary from instal- 
lation to installation. The averages, how- 
ever, should be representative of even a 
larger sample of installations and can be 
summarized in general terms as follows: 

* Approximately one-third of the total 

I/O activity goes to approximately 0.3 
percent of the total available DASD 
space; this is high activity data 

* Approximately 30 percent of the total 

I/O activity goes to less than six per- 
cent of the DASD space; this is high 
activity data 

* Approximately 15 percent of the I/O 

goes to 30 percent of the space; this 
is average (or moderate) activity 

* Approximately two percent of the 

I/O uses more than six percent of the 
space; this is low activity sequential 
data. If the average figures for data- 
sets which have not been referenced 
in more than 15 days (zero percent of 
the I/O and 20 percent of the space) 
are added to these values, you find 
that two percent of the I/O uses ap- 
proximately 25 percent of the avail- 
able space. 

If these findings for each of these sec- 
tions are simplified into a basic ratio of 
percent I/O (the yield) to percent GB (the 
acres), you can observe a basic yield per 
acre comparison as follows: 


Section Classification Yield Per Acre 


V-HI 100 
HIGH 5 
AVG. 0.5 
LOW. 0.1 


Obviously, the crop productivity dif- 
ferential between various sections of the 
DASD farm is 1000 to 1. It is beyond the 
scope of this article to deal with this is- 
sue, but it should be obvious that one type 
of farmland (device type) cannot effec- 
tively support each of these sections; with 
such highly varied yields, the crops are 
obviously different. Rice should not be 


Permanent Data Activity Analysis 
(An Evaluation Of Yield Per Acre) 
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A little frustrated with your relational database? 


e've seen this before - one more confused 
Wereanse, one more deadline and your day is 
shot. That's why we developed DYL-280 II Relational, 
the comprehensive information management system 
for DB2 and SOQL/DS. 


With a powerful free-form language, SQL support 
and menu-driven interfaces, DYL-280 II Relational 
satisfies the needs of both programmers and end- 
users. DYL-280 II Relational also consistently delivers 
reliable results with VSAM, IMS/DB, DL/I, IDMS and 
IDMS/R. 


DYL-280 II Relational provides everything you 
need to fully control the information within your 
relational database. But why take our word for it? 
Here’s what one customer has to say... 


“DYL-280 II Relational enables us to do mixed mode 
processing and report generation in one easy step. 
OME is fine for straight report writing, but we want to 
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be able to read and update a DB2 table using a flat file, 
and produce a report simultaneously. This can’t be 
done with QMF, and the other alternative is to use 
COBOL. DYL is far simpler to use and much faster. 
Another feature we like is the way DYL handles SQL 
return codes.” 

Ms. Jean Mulcahey 

Advisory Hlodvioninie? Analyst 

MONUMENTAL LIFE INSURANCE 


Find out why over 20,000 professionals worldwide 
have depended on Dylakor to eliminate their MIS 
frustrations. 


For more details on the DYL-280 II Relational 
information management system call 818/718-8877. | 


wie STERLING 
Raved SOFTWARE 
STeuaTignss Dylakor Division 


AD0002 oy le SQL DS. DL |. VSAM. and IMS/DB are trademarks of IBM Corp 
10 IDMS'R are trademarks of Computer w Associates International, inc 
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Non-Permanent Data Activity Analysis 
(An Example Of Crop Rotation) 

Type of Non-Permanent Data Total Non- 

DP Sortwk (&&) Non-Sort (&&) Deleteable Permanent 
Site %GB %*I/O %GB NO %GB I/O %GB %l/O 
1 0.5 0.8 0.3 11.5 8.5 8.2 9.9 20.5 
2 0.1 0.0 0.3 2.3 11.9 34.4 12.8 36.7 
3 1.2 0.7 0.8 15.2 hg type eh 2.6 15.9 
4 0.8 2.7 0.3 4.7 2.4 3.7 20.5 
5 0.3 0.2 2.2 5.4 1.8 ee 12.4 8.7 
6 0.7 2.0 0.5 10.3 5.8 5.7 5.9 18.0 
7 0.8 2.3 0.8 14.1 5.7 6.9 7.0 23.3 
8 1.1 41 0.5 7.9 1.4 5.3 2.9 17.4 
Avg. = 0.7 1.6 0.7 8.9 5.4 11.4 7.1 20.1 

*NOTE: Percent GB for individual types is the average plus two standard deviations; 
percent GB for the total is the maximum observed concurrent usage. 


planted in a desert and wheat should not 
be planted in a rice paddy. 


An Example Of Crop Rotation 

Figure 3 presents an analysis of non- 
permanent data activity. Non-permanent 
data includes true temporary datasets (with 
DSName = &&xxxx) and datasets which 
have permanent DSNames but are deleted 
during the analysis interval. For analysis 
purposes, true temporary datasets (&&) 
are subdivided into SORTWK datasets 
(DDname = SORTWKnn) and _ non- 
SORTWK datasets. 

Non-permanent datasets utilize DASD 
space on a dynamic basis, acquiring and 
releasing space as needs dictate. They are 
a current and frequently-used type of data 
which exemplifies the merit and potential 
of varying the use of storage space as 
needs vary. They exemplify crop rotation 
in action. 

Figure 3 presents. information both by 
type of non-permanent data and in total. 
Space usage for this data is tracked by a 
second-to-second basis and the high-water- 
mark usage during each of 1000 intervals 
is used to compute the maximum and av- 
erage usage with standard deviation for 
each type. Interesting observations from 
this data include the following: 

«Contrary to common opinion, 

SORTWK datasets tend to invoke 
much Jess I/O than non-SORTWK 
datasets 

¢ All temporary datasets (&&) tend to 

use much less DASD space than com- 
monly believed — maximum interval 
space usage for these datasets tends 
to be about two percent of the avail- 
able space 

¢ Total non-permanent space usage 

(based on the absolute maximum con- 
current usage by all types) averages 
7.1 percent of the available space; this 
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space processes 20.1 percent of the 
I/O on average. 

If you look at this data in a fashion 
similar to that used for the permanent data 
in Figure 2, you see that the yield ratio is 
about three to one. Non-permanent data, 
using a crop-rotation concept is much 
more productive than more than 80 per- 
cent of all DASD space. Recent devel- 
opments with system managed storage, as 
introduced by IBM with DFSMS, can be 
viewed as a form of crop rotation; the 
potential of dynamic storage management 
within and between various device types 
is exciting, particularly in view of these 
findings. 


Poor Richard’s Summary 


Figure 4 presents a summary picture of 


the findings of this article. Some liberties 
have been taken to factor in the 6.7 per- 
cent average space utilization by SYS1 
datasets. Values are modified to conven- 
ient increments. Annotations summarize 
the observations in the following para- 
graphs; comments regarding potential de- 
vice types are based on the cost-per-I/O 
concept. 

Approximately one-half percent of the 
DASD space generates 30 percent of the 
I/O activity. Because of this intensity of 
I/O activity, this data calls for a high per- 
formance device-type such as expanded 
storage or an SSD. 

Approximately 15 percent of the DASD 
space generates SO percent of the I/O. The 
high amount of activity to this data sug- 
gests the use of a cached DASD subsys- 
tem or high-performance single density 
DASD (for example, the IBM 3380J). All 
non-permanent data is included in this 
category because the I/O-to-space profile 
for such data is closer to the profile for 
this category than any other. 

Approximately 30 percent of the DASD 
space generates only 15 percent of the 
I/O activity. This includes moderate ac- 
tivity data and low activity data which 
must be on a direct-access device. High- 
capacity (for example, double or triple 
density) DASD is the suggested storage 
media. 

Approximately 25 percent of the DASD 
space generates a mere five percent of the 
I/O activity. This data grouping will in- 
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Average DASD Profile 


Space Utilization Category 


0.5% of space//30% of I/O 
(ESTOR or SSD candidates) 


15% of space//50% of I/O 
includes non-permanent data 
(Cache or HPDASD candidates) 


30% of space//15% of I/O 
(HCDASD candidates) 
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25% of space//5% of the 1/O 
includes large sequential files 
and data not used over 15 days 
(Cartridge or ACS candidates) 


30% of space//0% of I/O — 
this space is not used 
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MANAGING 
DASD PERFORMANCE 
CAN BE A PLEASURE TRIP. 
NOT A SURVIVAL COURSE 


DASDMON will revolutionize the way you manage 
MVS DASD performance. 

Traditional DASD tuning techniques are being 
outpaced by faster CPUs and increasing user demands 
for more online data. Although cache controllers, data 
spaces and hiperspaces will relieve some of the strain, 
they also create new complexities. Tuning DASD can 
feel like struggling through a survival course. 

DASDMON takes you away from it all. Manag- 
ing DASD performance is more automatic and stream- 
lined than ever before. Once you’ve set response time 
objectives, just sit back and... 

DASDMON will identify problems by contin- 
ually measuring individual I/O response times and 


comparing them to your objectives. DASDMON will 
determine solutions to problems, simulate their effects, 
and select the best possible set of solutions so you can 
implement recommendations with confidence. 

DASDMON’s solutions are presented in easy- 
to-understand text, making it the ideal tool for the 
novice or expert performance analyst. And, our techni- 
cal support staff is available 24 hours a day to answer 
your questions. 

If you need system managed performance today, 
call us at 800-323-2600 (in PA, 412-323-2600). 

DASDMON from LEGENT. Enjoy the results. 
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LEGENT 


The company formed by the merger of Duquesne Systems and Morino. 


Two Allegheny Center 


Pittsburgh, PA 15212 
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THE FILE TRANSFER SYSTEM FOR VSE AND MVS 


APPLICATIONS 
¢ Electronic Data Interchange (EDI) 
* Point of Sales Polling 
* Batch Data Transfer 
* Inter-Office Communications 
* Distributed Processing 
FEATURES 
¢ Unattended Operation * Autodial » Autoanswer * Bisync Transmission 
¢ Async Error Detection * Multiple Leased or Switched Lines 
* ASCII/EBCDIC Transmission * Transmission to 4096 Characters 
¢ Complete Error Recovery/Restart * Audit Trail Reporting 
* Compression * Transparency * Security 
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CICS/JSUB submits batch JCL from a CICS application program. Users no longer 
have to use ICCF or TSO to submit batch jobs. Set up menu screens for users to enter 
parameters, edit them within your CICS program, plug them into your JCL, and submit 
JCL from your CICS program interfacing with CICS/JSUB. Since CICS/JSUB starts an 
independent task to submit the JCL, the terminal operator can continue working while 
the JCL is being submitted. Response time is not affected. $495 for purchase or $195 
for annual lease. 


CICS/LOG VIEW writes all CICS log entries to a single VSAM file and provides 
comprehensive online display and printing. Logs can be displayed separately or 
combined. Searching can be done by date and time. A ’FIND’ facility provides searching 
for specific character strings. Provides for online notification of exceptional conditions. 
Unwanted log entries can be excluded from logging. A batch facility is included to allow 
printing log entries on the system printer. You can selectively print a few or all log 
entries. $495 for purchase or $195 for annual lease, VSE and MVS. 


JCOPY is a utility language for copying files, one-time jobs, and simple programs. 
Includes routines for accessing POWER queues, Source Statement Library, ICCF, 
Panvalet, LIBRARIAN, etc. Will scan for character strings, translate EBCDIC to ASCII, 
search tables, etc. $1,995 for purchase or $795 for annual lease, VSE only. 


30 day free trial available on all three products 
Call MacKinney Systems (417) 882-8012 
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clude large sequential files and data not 
referenced for more than 15 days (or any 
appropriate period). This type of data is 
a strong candidate for processing or ar- 
chival with cartridge or an ACS. 

Approximately 30 percent of existing 
DASD space generates no I/O activity and, 
in most cases, it is not allocated. This 
space is essentially not used. 

Overall, only about 45 percent of an 
average DASD farm is utilized in a pro- 
ductive and effective fashion. Approxi- 
mately 55 percent of the available space 
is either unused or underutilized and, 
therefore, is not needed or belongs on an 
alternative storage media. 


A Farmer’s Conclusion 


Standard DASD usage surveys report 
that average space allocation is in the range 
of 65 to 70 percent and has remained fairly 
constant for several years. The findings in 
this article, however, are that ‘‘effective’’ 
DASD usage is only about 45 percent to- 
day and I believe that ‘‘effective’’ usage 
is declining as time passes. It is expected 
that faster CPUs and larger shared DASD 
complexes will force a reduction in effec- 
tive space usage, at least with current 
technology. 

What is the trend in ‘‘effective’’” DASD 
utilization? Is the projected growth rate 
for installed DASD capacity realistic or 
warranted in view of the fact that only 
45 percent of currently installed DASD 
is used effectively? What if more data 
is placed on the proper device? What if 
the current trends toward system man- 
aged storage enable more effective utili- 
zation of existing DASD? What if —? 
Only time will answer these questions 
and the answers must be deferred to fu- 
ture studies. = 
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_ VSE/SP Conditional JCL 


onditional JCL is one of the en- 
4 hancements provided with VSE/SP 

Release 2 and subsequent releases. 
With conditional JCL you can execute or 
bypass job steps according to the success 
or failure of previous ones. Conditional 
job control can be used to eliminate many 
situations: a VSAM file tape backup fails, 
the IDCAMS delete/define works and the 
restore step fails because there was not a 
tape created during the backup. A situa- 
tion like this would result in the file being 
destroyed. This article presents the new 
features of conditional job control, pro- 
vides examples for their usage and ex- 
plains the new JCL statements. 

Before conditional JCL, VSE job 
streams had to be planned carefully. Mul- 
tiple job steps were placed within a VSE 
job so that if one canceled, the remaining 
job steps would not execute. If the job 
steps were in separate VSE jobs, then the 
next job on-job step would begin execu- 
tion. Several techniques were devised by 
VSE shops to handle job flow after job 
step abnormal termination or cancel. A 
technique I have installed for several cus- 
tomers was an Assembler language rou- 
tine used to flush remaining job steps in 
a job. This routine could be requested to 
cancel or dump. It also turned on the pause 
bit in the partition communications region 
so at end-of-job, the partition would stop 
with the READY FOR COMMUNICA- 
TIONS message. By issuing a cancel 
macro the job steps that remained after 
the canceling job step would not be exe- 
cuted. VSE job control would skip to the 
/& (end-of-job) statement. If you have a 
requirement to set return codes from a 
high-level language, chapter four of the 
IBM manual, VSE/SP Migration Volume 
2, contains a sample Assembler and 
COBOL program that you can use to cre- 
ate your own callable subroutine to set a 
return code. Subsequent job steps can test 
the return code to decide execution flow. 
Table 1| lists the six new JCL statements 
and their meaning. 

VSE conditional JCL does the fol- 
lowing: 

* Provides job-step to job-step 

communication 
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* Provides logic to alter job execution 
and job control statement sequence 
* Provides checking of return codes 
set by IBM components and user 
application programs 
* Utilizes six new JCL statements (the 
first five listed below are conditional 
JCL statements). 
. /. label 
.// ON 
L/L AF 
. 11 GOTO 
. SETPARM 
. // PWR 
Normal VSE job control processing of 
JCL statements takes place in sequential 
order as the statements are submitted to 
the system. A job begins with a // JOB 
statement and ends with a /& (end-of-job 
statement). Within a job there may be one 
or more job steps. With conditional JCL 
this normal top-to-bottom processing se- 
quence can be altered conditionally. Se- 
quence is altered depending on return 
codes set in previous job steps within the 
same VSE job. The return codes are 
passed to job control by programs or when 
abnormal termination occurs or the job is 
canceled. 


Return Codes 


Central to the use of conditional job 
control is the ability to set and check re- 
turn codes. Condition codes may be set 
by Assembler language programs in the 
range from zero to 4096. The return code 
is usually set by the EOJ or DUMP ma- 
cros. There are several return codes used 
by IBM programs. The return code stand- 
ards for IBM products and components 
are listed in Table 2. The IBM VSE com- 
ponents and products that set and use re- 
turn codes are listed in Table 3. 

The return codes passed to job control 
are tested by IF or ON statements. Testing 
the return codes allows job processing de- 
cisions to be made on whether to skip or 
execute particular job control statements. 
Sequence is altered by the GOTO in con- 
junction with /. label statements. 


/. Label Statement 


The label statement is used to identify 
a point to which control may be passed 


skipping job control statements. The name 
used for label will be referenced by the 
label operand of the GOTO statement. The 
label may consist of one to eight alpha- 
numeric characters and the first character 
must be alphabetic. A symbolic parame- 
ter is not allowed as a label. The first two 
characters ‘‘/.’’ identify this as a label 
statement. 

When used as a job control statement, 
the label statement must be coded on the 
same level as the GOTO that referenced 
it. The same level is defined as having 
both the label and GOTO inside a pro- 
cedure or both outside a procedure. In 
other words, you may not attempt to 
GOTO a LABEL in a different procedure 
when using nested procedures. 

For example, if a label statement was 
needed with a value of EXIT it would be 
coded: 

/. EXIT 


ON Statement 


The ON statement for job control is a 
global condition check. When coded in a 
job stream, it checks the return code con- 
dition immediately after each job step. 
When this statement is processed in a job 
stream, it is valid for the rest of the VSE 
job. If several IF statements exist in a 
VSE job, they are stored and the most 
recent is checked first. When a GOTO 
label is specified on the ON condition, the 
GOTO target label must be on the same 
level as the GOTO statement. Checking 
will be done in the same level it was 
specified or in all lower levels. There- 
fore, an ON condition specified within 
a procedure is in effect until the end 
of the procedure. An ON condition 
specified outside a procedure is in effect 
until end-of-job. 

An example of an ON statement that 
would check for a cancel condition and 
branch to the end-of-job statement would 
be coded: 

// JOB 

// ON $CANCEL GOTO JOBEND 


/, JOBEND 
/& 
Table 4 shows the default ON state- 
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Does IBM have all the answers 
to your VSE needs? 


No...Westinghouse Does. 


Even before IBM had many DOS/ VSE tools commercially available, 
Westinghouse was developing system software for you. So if you’re having 
trouble finding the answers to your VSE needs, talk to us. 

These people have. 
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resources...they get the job done.” 
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price and performance products for the VSE environment. 


DISK UTILITY SYSTEM 
Securely performs all backup/restore/copy services and manages 
disk data in only one program. 


DISK SPACE MANAGER 


Automates DASD space management with 30% more functionality than 
the competition and 50% less in initial and recurring fees. 


TAPE MANAGER 


Automatically manages tape inventories and datasets which reside on them 
with 50% less memory utilization than competitive products. 


Call us today at (800) 348-3523 or (412) 256-2900 to get the answers to your 
VSE needs. We provide a complete line of VSE products. 


@) Westinghouse 
Management Systems Software 


IBM is a registered trademark of International Business Machines 
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Six New VSE/SP JCL Statements 
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Some functions not (or partly) executed, but processing continues 
Function could not be performed 


Severe error; job stream flushed 


IBM Components Support Of Return Codes 


rea i 


VSE/AF Libr and LNKEDT: RC=12 not used 


MSHP: Only 0 and 16 supported 


Assembly: Only 0 and 128 supported 
FORTRAN 
COBOL R3 


DFHEnp1$: n=A,C,P,R depending on language 
translator 

PII 

RPG Il 


Component 

Librarian 

MSHP 

Assembler 

Tse 
FFORTRAN: RC =99 for severe error; 
user program can set on STOP statement 

Tei 

NCP/SSP 

DITTO 

Network PPs 


No support 

No support 

No support for networking products 
No support not needed 

No support 

No support 


Supported for compiler only 
No support 
No support 
VTAM 
SDF/CICS 
SORT 


ments return code value and action. These 
are the values that are in effect when a 
VSE job begins. These values are over- 
ridden when you issue an ON statement. 
If you want to override job control’s check 
of all return codes, you would code the 
following: ON $RC > 0 CONTINUE. 
This will nullify the default actions and 
allows you to code IF statements to check 
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the return codes in the job stream. 

In Table 4 CONTINUE means that nor- 
mal flow and processing will continue if 
the specified condition is true. $EOJ re- 
fers to the end-of-job statement /&. 
$ABEND means an abnormal termina- 
tion. $CANCEL means a job has been 
canceled through the AR CANCEL or a 
program issued a CANCEL command. 


16 CONTINUE 

16 GOTO $EOJ 

16 CONTINUE 
$CANCEL GOTO $EOJ 
SABEND GOTO $EOJ 


$RC 
SABEND 
SCANCEL 


comparator number 


Table 5 lists possible ON conditions and 
their meaning. Note that the conditions 
may be combined with a comparator. 
There are three ON conditions: $RC, 
$ABEND and $CANCEL. $RC specifies 
the return code of the preceding job step, 
$ABEND is for job step abnormal ter- 
mination and $CANCEL occurs when the 
operator or the program issues a cancel 
request. 

Referring to Table 5, the $RC condi- 
tion allows one of six comparators against 
a return code. The comparators are: EQ 
or =, NEor 7=, GT or >, GEor >=, 
LT or < and LE or <=. Two $RC con- 
ditions may be continued using the logical 
operators (OR or I) and (AND or &). The 
operators must be preceded and followed 
by a blank character. When $RC is used 
with logical operators the specified action 
takes place at end-of-job-step when: 

* The conditions are connected by OR 

or | and one or both of them are true 

* The conditions are connected by 

AND or & and both of them are 
true. 

Multiple job steps which worked prior 
to VSE/SP2 may fail because the default 
action for return codes greater than 15 is 
cancellation of the remaining job steps. 
While this will be a rare occurrence, you 
can avoid the problem above by coding 
the ON statement. 


IF Statement 


The IF statement can only be used as 
a job control statement. The ON condi- 
tion, just discussed, provides global con- 
ditional checking where the IF statement 
provides local condition checking. IF is 
only valid at the point in the job where it 
occurs. After the IF test, if the condition 
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Possible IF Conditions 


condition condition 


comparator 
comparator 
comparator 


checked were true, the next statement is 
executed. If the condition were false, the 
next statement is skipped unless it is a 
// JOB, /& or / + statement. The IF 
statement can be continued. The condi- 
tions that can be checked are: $RC, $MRC 
and parameter name. 

Table 6 lists possible IF conditions and 
parameters. The IF statement can check 
Return Code of preceding job step (SRC), 
Maximum Return Code from all preced- 
ing job steps in this job (SMRC) or a sym- 
bolic parameter value. The condition 
pname specifies a parameter value for 
comparison. The number condition spec- 
ifies an integer from zero to 4095. The 
condition string specifies up to 50 char- 
acters. The symbolic parameter name 
tested (pname) must have been previously 
set with the SETPARM statement. 

The IF statement uses the same six 
comparators as discussed under the ON 
condition above. It also uses the same 
logical operators and logical operator 
rules. If parameter name is used in the 
comparison, it will be a character string 
of zero to 50 characters. Special charac- 
ters may be enclosed in quotes. Parameter 
name can be a symbolic parameter set by 
the SETPARM statement. It can also be 
used to check for a NULL parameter. 

In the following example of an IF state- 
ment, the statement checks for a maxi- 
mum return code of less than or equal to 
10 and the return code of the previous job 
step less than eight. If the statement is 
true, the GOTO to label CKEOJ is exe- 
cuted. If the tested condition is false, the 
GOTO statement is bypassed. 


// IF $MRC <= 10 AND $RC < 8 THEN 
// GOTO CKEOJ 


GOTO Statement 


The GOTO statement causes all JCL 
statements or commands (except / / JOB, 
/ & and / + statements) to be skipped 
following the GOTO statement up to 
the specified label. The specified label 
must be coded on a label (/ .) state- 
ment. An example of the GOTO state- 
ment would be: 


96 


Job Control 


// GOTO EXIT 


Ifa/ + is found during statement skip- 
ping, the rest of the job is skipped. You 
can specify $EOJ as a label to specify that 
all statements up to end-of-job are to be 
skipped. 


SETPARM Statement 


The SETPARM statement is used to as- 
sign a value to a symbolic parameter that 
may be used later in job control. SET- 
PARM is accepted only within a job. For 
use in conditional JCL processing, the 
SETPARM value may be tested by an IF 
statement. A parameter may be a char- 
acter string or a predefined return code. 
After the SETPARM statement is proc- 
essed in a job, the symbolic parameter is 
treated as if it were the specified string or 
return code. It is in effect for only that 
one job. The symbolic parameters to be 
defined may consist of one to seven al- 
phanumeric characters the first of which 
must be alphabetic. A symbolic parame- 
ter may be: a character string, $RC or 
$MRC. 

Character string is a symbolic param- 
eter value of up to 50 characters. $RC is 
the return code of the preceding job step 
and $MRC is the maximum return code 
from all preceding job steps in this job. 
To give the name RTNCDE!1 to a return 
code, the following SETPARM statement 
could be issued: 


SETPARM RTNCDE1 =$RC 


Later in the job stream it could be tested 
by issuing the following IF statement: 


IF RTNCDE1>0 THEN 
GOTO ENDJOB 


/ / PWR Statement 


The PWR statement, while not a con- 
ditional JCL statement, can be used to 
control or alter job processing. It can cause 
a VSE job in the POWER queue to be 
released or held. Syntax checking of the 
statement is done by VSE/POWER not 
the job control programs. Therefore, 
symbolic parameters are not allowed. The 
operand to specify the job to be held/re- 
leased cannot be a single character (which 
would specify a class), the word ALL or 
an asterisk. It has the same syntax as 
POWER commands issued at the operator 
console. 

In the following example, if a zero re- 
turn code was returned from the previous 
job step, the job BKUPFILE would be 
released from the reader queue. Other- 
wise, a branch would be taken to the label 
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NOBKUP skipping the PWR command: 
// IF $RC>0 THEN 
// GOTO NOBKUP 
// PWR PRELEASE RDR,BKUPFILE 
/. NOBKUP 


Conditional JCL Rules 


IBM has established the following rules 
for using conditional job control state- 
ments: 

* The statements of a job stream can 

only be skipped in a forward direction 

* A target label statement must be on 
the same level as the GOTO state- 
ment, that is, both outside a proce- 
dure or both in the same procedure 
If a label is not found before end-of- 
procedure or end-of-job, a skip to end- 
of-job is performed 
No check for duplicate labels is per- 
formed; a skip is always performed 
up to the first matching label found 
* ON-conditions are checked first 
whenever a job step has been exe- 
cuted 
If there are several ON statements de- 
fined in a job stream, the conditions 
and actions of these statements are 
stored and processed in a last-in-first 
checked sequence; therefore, the last 
one to be issued is carried out 
If an ON $CANCEL condition is in 
effect and a job stream is canceled, 
either through the use of the AR com- 
mand or a program request, the action 
specified is performed and processing 
continues; otherwise, the job is flushed 
An ON $ABEND condition is raised 
when a job step ends abnormally. If 
an ON $ABEND condition action has 
been specified, the action is per- 
formed and processing continues; 
otherwise, the job is flushed. = 
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For data centers that need more 
than piecemeal solutions. 


SAA lets you support more sites, more platforms, and more 
environments than ever before. But there's a catch: you still have 
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management system for today’s forward-looking data centers. 
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’s Been Announced! 


n June 20, 1989, IBM announced 
QO: new and improved version of 

CICS that everyone has been 
waiting for. At least, those customers who 
have submitted more than 200 require- 
ments against the product from user groups 
such as SHARE and GUIDE have been 
waiting for it. That is how many require- 
ments have been satisfied by CICS/ESA 
3.1. Not only did IBM listen, but also it 
acted. Requests such as VSAM file defi- 
nition via RDO and UCTRAN control at 
the transaction level are just two exam- 
ples. Of course, there are still outstanding 
requirements that have not been incor- 
porated — maybe in 3.2? The result, 
however, is an innovative version that in- 
corporates significant new technologies 
and exploits new architectures of ESA. 
This article will attempt to present a few 
of the enhancements available in the new 
version such as new code base, storage 
management enhancements, performance 
enhancements, new CICS dispatcher, 
serviceability and support and migration/ 
coexistence issues. 


New Code Base 


In CICS/ESA, much of the existing 2.1 
code has been entirely rewritten into a dif- 
ferent base, providing a new look for 
CICS. The Statement of Direction in Oc- 
tober 1988 announced the promise of the 
new CICS without any specific date. The 
announcement of CICS/ESA 3.1 on June 
20, 1989 contained more detailed infor- 
mation. With the proposed ship date of 
June 1990, IBM is providing a descrip- 
tion of facilities and functions to prepare 
customers for its delivery. In addition to 
enhancements, the 3.1 version removes 
some previously-supported functions and 
CICS users must prepare alternatives or 
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removal of these facilities if they wish to 
take advantage of this release. In addition 
to the warnings of removed function, the 
Statement of Direction further details the 
migration and coexistence issues. 


Domains 


CICS/ESA 3.1 contains a domain-based 
architecture. Domains are IBM’s tech- 


Version 3.1 
incorporates 
significant new 
technologies and 
exploits new 


architectures 
of ESA. 


nique to encapsulate the program code and 
its control blocks. As defined in the new 
manual, C/CS/ESA Version 3.1 Release 
Guide (GC33-0655), ‘‘a domain is a 
functionally separate element of CICS 
code that has sole control over its own 
resources.’ This technique isolates the 


function from the use. For many years 


customers have asked CICS to provide 
storage isolation within CICS systems and, 
therefore, avoid those dreaded storage vi- 


olation failures. This new internal archi- 
tecture separates CICS into functional do- 
mains by isolating the control blocks 
within the domains. A few functional areas 
that have been restructured in this version 
are the dispatcher, the loader, dump proc- 
essing and monitoring. If data within the 
domain is required by another domain, a 
domain call is made and the results are 
returned to the requestor. This process uses 
a strictly defined interface between a do- 
main and the requestor, affording protec- 
tion for critical elements from incorrect 
modification. 

Of course, many new modules are dis- 
tributed Object Code Only (OCO). Pro- 
grammers who in the past enjoyed ac- 
cessing and manipulating CICS internals 
may find it difficult, if not impossible, to 
continue to do so. These domain-based 
modules will, no doubt, consider this in- 
formation proprietary and not manipulat- 
able. The domain architecture will also 
allow IBM to enhance and service the 
product with less impact to the customer. 
Customers who requested storage isola- 
tion and integrity, yet continued to tailor 
CICS for their particular needs, will find 
it difficult to have both. Most installa- 
tions, however, have ‘‘seen the handwrit- 
ing on the wall’’ and removed source code 
modifications from their applications. 


Storage Management 


There are a number of enhancements to 
storage control in the 3.1 version. Some 
use ESA facilities to exploit the new ar- 
chitecture, while others provide Virtual 
Storage Constraint Relief (VSCR) that 
many installations have been waiting for. 

While CICS has utilized the Dynamic 
Storage Area (DSA) for storage manage- 
ment for quite a while, the 3.1 version 
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will contain an Extended DSA (EDSA) 
for storage above 16MB. The EDSA, like 
the DSA, is created during initialization 
and satisfies program requests for storage 
when possible above the 16MB line. New 
parameters in the SIT, DSASZE and ED- 
SASZE replace the previous OSCOR en- 
try to specify the size of the dynamic stor- 
age area, both above and below the 16MB 
line. Installations that were previously 
constrained by the size of the DSA and 
the high rate of program compression that 
could occur will now have substantially 
more capability with an EDSA. 

Another new facility called Progressive 
Program Compression enhances program 
control. While the storage manager do- 
main provides statistics of free storage to 
the loader domain, the loader domain uses 
a Least Recently Used (LRU) algorithm 
to delete programs and maps gradually, 
and with less impact on the system, re- 
duce the possibility of Short-On-Storage 
(SOS). This process should make both 
the storage and program control within 
CICS more evenly managed during sys- 
tem operation. 

A new attribute for programs and maps 
has been provided. If a program or map 
is infrequently used, it can be defined 
transient. When the use count for these 
resources reaches zero, storage is released 
and can be made available to other re- 
quests. This further enhances storage 
management techniques and gives the 
customer more control over what re- 
sources use the storage and for how long. 

Additional extensions are provided to 
programming interfaces, including the 
EXEC CICS commands. These include 
several functions that were previously 
only available using macro-level pro- 
gramming. This, of course, is IBM’s 
way to encourage installations to replace 
macro-level programs with supported 
commands. 

Customers will receive VSCR from 
several changes: CICS supplied transac- 
tions, the File Control Table and code and 
SNTTEs. A major change has been made 
to DL/1. A new address space, Database 
Control (DBCTL) moves many DL/I re- 
sources out of the CICS address space, 
much the same way that DB/2 resides 
outside of CICS. For the DL/1 user, this 
can free more than 1 MB of virtual storage 
from within the CICS region. 


Performance 
In this release, domain-based monitor- 


ing provides substantial improvements in 
monitoring overhead. IBM states that the 
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cost of performance monitoring has been 
reduced by 50 percent. 

CICS/ESA 3.1 now uses the MVS pro- 
gram loader from a separate Task Control 
Block (TCB) in CICS. This provides the 
ability for CICS to take advantage of Li- 
brary Lookaside (LLA) and Virtual Look- 
aside Facility (VLF) in ESA. CICS will 
now be able to load frequently-used re- 
sources, such as programs and maps, di- 
rectly from the LLA dataspace (or hiper- 
space). A high rate of program load may 


now be satisfied directly from storage 
(main or expanded) rather than from 
DASD. This facility, in addition to Pro- 
gressive Program Compression, could 
significantly improve CICS performance 
and program load time for many in- 
stallations. 

Other performance improvements in- 
clude a user-selectable trace, allowing the 
installation to turn off trace during normal 
production hours, and the support of sec- 
ondary extents in the CICS program li- 
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CICS Performance Optimizer 


As you may have already discovered, converting to XA 
does not necessarily mean your CICS performance and 
storage problems are over. Now it’s time to let the 
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XA address space when not in use 


Eliminates all CICS storage compressions 
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use of the Dynamic Storage Area (DSA) 
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load library during execution 
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ONLINE HELP 
AND 
DOCUMENTATION 
DEVELOPMENT 

FOR CICS 


REAL-FEATURES: REAL-BENEFITS: 

@ Create customized help systems @ Increase employee productivity 
tailored to individual needs. and maximize resources. 

@ Invoke other applications @ Lear to use CICS/VS 
without leaving the create-help applications more quickly and 
session. independently. 


Access help screens and pop-up 
windows with just a PF-key. 
@ Transfer data from help files 


@ Reduce trial-and-error and 
incorrect data inputs. 


directly to your applications. @ Introduce new applications 
@ Edit and print manuals from the more smoothly. 
help text you’ve created. @ Minimize end-user support calls. 
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a Improves Response Time 
* Eliminates Virtual Storage Constraints 


SY Reduces I/O and Wait On The 
Load Library 
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brary. A new dynamic transaction routing 
facility gives the MRO/ISC environment 
the ability to control the direction of 
transactions, potentially balancing the load 
between CICS systems. 


New CICS Dispatcher 


With the domain-based architecture, 
multiple CICS functions can be placed 
under separate MVS TCBs (much the 
same way that the first user of subtasking, 
VSAM, works in 2.1). This not only ex- 
ploits multi-processor CPUs for installa- 
tions that are running them, but also al- 
lows IBM to pursue this direction when 
functions and domains are added. N-way 
CPU exploitation via the new CICS dis- 
patcher could significantly improve trans- 
action performance. 


Serviceability and Support 


This will, undoubtedly, be one of the 
most controversial topics of CICS/ESA 
3.1. As the product becomes more OCO 
and the domain approach removes inter- 
nals from the applications that were pre- 
viously available, problem determination 
techniques will have to change. This ver- 
sion contains several changes to existing 
facilities to provide replacements for ac- 
cessing system internals. (What will third- 
party vendors do?) 


TRACE 


First Failure Data Capture is a new fa- 
cility that utilizes trace points in CICS 
code to trap an error when it occurs, even 
if the trace flags for that function are off. 
This makes it possible to turn trace off 
(and the overhead of tracing) and still have 
information available pertaining to the 
failure. 

Trace has been enhanced with several 
options. Installations can select tracing for 
specific CICS components, transactions 
or terminals. A CICS-supplied transac- 
tion, CETR, allows inquire and set of all 
new trace facilities. CETR provides 
screens for: 

* Current status of the internal, 

auxiliary and GTF trace 

* Current trace selection flags for each 

function and domain 

¢ Standard, special and suppressed 

trace settings for terminals and 
transactions. 

Trace entries can be printed via sys- 
tem and transaction dump formatting via 
DFHTUP or (for GTF traces) via the CICS- 
supplied DFHPDX formatting facility. 


DUMP 
Dump has been substantially changed 
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and has removed all support of the pre- 
vious formatted, snap, storage violation 
and CICS region dumps. A// CICS dumps 
are now produced via the MVS/ESA 
SDUMP facility and are routed to a 
SYS1.DUMPxx dataset. A new SIT op- 
tion specifies retry intervals; however, if 
the dump is unsuccessful a CICS message 
is produced. Installations will be required 
to ensure that a SYS1.DUMPxx dataset 
is available. System programmers who 
have not previously used DFHPDX with 
IPCS to format CICS/OS/VS 1.7 or CICS/ 
MVS 2.1 SDUMPs will be unable to es- 
cape the inevitable. Start using the facility 
now to avoid sudden migration shock. A 
complete explanation for installation and 
utilization of DFHPDX and IPCS was 
contained in the article, “‘CICS Dump 
Processing With DFHPDX,’’ (August 
1989, MAINFRAME JOURNAL). 


Migration/Coexistence 


One major factor in any installation’s 
decision to migrate to a new release is the 
protection of the business investment al- 
ready made. No customer would discard 
existing applications and immediately be- 
gin rewriting programs in preparation for 
any new version or release. In that light, 
IBM has provided some migration aids 
and coexistence techniques to allow cus- 
tomers to begin using enhanced function 
while retaining (for some time) unsup- 
ported facilities. 

Although no installations should be 
surprised, CICS/ESA 3.1 does not sup- 
port COBOL or PL/1 macro-level appli- 
cations. IBM made that perfectly clear 
in the October 1988 Statement of Direc- 
tion. This release will be the last to sup- 
port Assembler macros, probably since 
many installations have error routines 
such as NEP or PEP written in Assem- 
bler. Customers are encouraged to re- 
write these routines using the command 
level interface. IBM has also provided 
DFHMSCAN, which can be used in pre- 
CICS/ESA 3.1 systems to locate and be- 
gin conversion of macro code. This fa- 
cility is available via PTF for both Ver- 
sions | and 2 and can be ordered through 
the normal service process. 

Some additional function has also been 
removed such as TCAM (DCB) and 
BTAM. In the next release, exits will no 
longer have access to control blocks and 
applications will not have addressability 
to the CSA. Customers are encouraged to 
utilize RACF or another external security 
manager, since CICS internal security will 
be removed. 
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Installations wishing to run CICS/ESA 
3.1 and retain some CICS systems with 
unsupported function are advised to keep 
CICS/MVS Version 2 to support those 
systems. CICS/ESA 3.1 can function ship 
via MRO/ISC to macro applications in a 
Version 2 system and use CICS transac- 
tion routing to access BTAM terminals 
from the 3.1 applications. Of course, this 
environment will require multiple CICS 
licenses (Version 2 and Version 3). In ad- 
dition to support issues, installations will 
need to be aware of the financial impact 
of paying for both licenses. 

Speaking of financial impact, cus- 
tomers may be amazed to note the license 
charge on CICS/ESA 3.1. As they say, 
‘‘No Free Lunch,’’ and the enhancements 
provided in this version are indeed, not 
free or even cheap. Thankfully, this an- 
nouncement was made well before the in- 
tended ship date. Customers that plan to 
install when the product becomes avail- 
able will need to reflect the increase in 
their budgets. 


Summary 


CICS/ESA 3.1 has many additional en- 
hancements that cannot be fully explained 
in this short article. | would encourage 
customers who are interested in this new 
version to read the announcement letter in 
great detail. Even though this version does 
not ship until 1990, several manuals are 
now available and can be used to get a 
more thorough understanding of the 
changes and impact. GC33-0655 Release 
Guide and GC33-0656 Migration Guide 
contain a much deeper explanation of the 
new facilities. This version is truly a new 
CICS as promised in the Statement of Di- 
rection and will provide many new chal- 
lenges and opportunities for those in CICS 
technical support. = 
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Automated 
Service Level 
Manag 


ement 


And Its Supporting Technologies 


echnologies that aid the data proc- 
essing professional in the manage- 
ment of service delivery are the fo- 

cus of this article. The management of 
service delivery or Service Level Man- 
agement (SLM) is a process that includes 
establishing service levels, managing ex- 
ceptions to agreed upon service levels and 
planning capacity changes for future serv- 
ice requirements. In many environments, 
service delivery commitments are docu- 
mented in the form of Service Level 

Agreements (SLAs). 

SLAs usually contain the following 
elements: 
¢ Availability: the time frame in which 

a service is available for use (on-line 

up from 6 a.m. to 9 p.m.) 

Delivery Time: the duration of a serv- 

ice activity (response time not to ex- 

ceed three seconds, compiles not to 
exceed 30 minutes) 

Volume: number of concurrent uses 

of a service (no more than 300 con- 

current users, no more than 50 trans- 
actions per second) 

* Cost: the cost established for each unit 
of service (dollars per transaction or 
dollars per job) 

* Quality: number of errors incurred 
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By Jack Noonan 


during service delivery (number of re- 
runs per shift). 

Underlying effective SLM are some 
supporting technologies. Specifically, 
structural components of an SLM system 
consist of monitoring, analysis and auto- 
mation together with the ability to do all 
of these from a remote location. 


Monitoring 


Monitoring is the foundation SLM 
technology for determining if a problem 
exists or if a service commitment is not 
being met. The monitoring component 
should provide status on availability, de- 
livery times and volumes. Delivery times 
such as transaction response times are im- 
portant when monitored, while the net- 
work user actually experiences them. In 
other words, response time should be 
monitored in an end-to-end fashion, dis- 
playing the actual response time experi- 
enced at the terminal. This is important 
in order to eliminate any confusion over 
the real response time. 

The user interface of a monitoring sys- 
tem plays a strong role in the focus and 
alignment of all participants in the SLM 
process. This interface should be easy to 
understand and intuitive to use. A traffic- 


signal-like implementation seems appro- 


priate to this application. A green status 


signal can indicate good service delivery 


or at least the absence of a service deliv- 
ery problem. In addition, a yellow status 


signal can warn of potential service deliv- 


ery exposures and a red status signal can 


indicate that a service commitment is not 
being fulfilled. Status displays of this type 


can then be used to focus all SLM partic- 


ipants on the single goal of keeping the 
lights green. 

The statusing capability should be able 
to integrate status from any location within 
an enterprise. This will support the co- 
operative processing and distributed data 
characteristics of new applications. The 
statusing capability should also provide 
diagnostic navigation to additional infor- 
mation wherever the monitor may be lo- 


cated within the enterprise. 


Analysis 


Analysis to determine where the prob- 
lem is located, what workload is causing 


the problem and what resources are in 
contention will facilitate in the correction 
or prevention of service delivery prob- 


lems. This analysis applies to all service 


delivery exposures. However, in this ar- 
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ticle I will focus on transaction response- 
time problems. 

When analyzing transaction response 
time it is important to understand where 
the transaction is spending its time; spe- 
cifically, how much time was spent in the 
host and how much time was spent in the 
network? Doing this analysis first should 
improve problem-solving effectiveness. 
Notice that I said effectiveness, not effi- 
ciency. Location analysis will help in the 
selection of the correct problem to solve, 
but not necessarily help solve the prob- 
lem faster. If a transaction spends one 
second in the host and 10 seconds in the 
network, the primary target for response- 
time improvement should be the net- 
work, because a 100 percent improve- 
ment in host response time would net 
less than a 10 percent improvement in 
total response time. 

This same logic also applies to the 
workload impact analysis or the analysis 
of who is causing the problem. Why tune 
DASD to improve transaction response 
time if the problem is caused by a batch 
job that was inadvertently released on 
prime shift? There is no tuning trick 
known to man that will solve a response- 
time aberration of this type. The solution 
for this can be accomplished by any sys- 
tems operator as long as the offending job 
can be identified. Once this job is iden- 
tified, it can be canceled, swapped out for 
later execution or placed in a higher per- 
formance group to speed its completion. 

Finally comes resource analysis. De- 
pending on the resource in contention and 
the enterprise requirements, many things 
can be done, ranging from re-prioritizing 
or relocating resources to increasing re- 
source capacity. Resource analysis has 
been with us for many years and is well 
understood by a large body of analysts. I 
have little to add to this subject except to 
say, do not do resource analysis first. Per- 
form location analysis first, then work- 
load impact analysis and, last, resource 
analysis. 


Automation 


Automation is the next logical exten- 
sion to an SLM system. As data process- 
ing systems increase in size and complex- 
ity, automation becomes an imperative, 
especially when service delivery prob- 
lems arrive at machine speed. The auto- 
mation of data gathering, problem anal- 
ysis and problem resolution can be 
combined to make SLM a winning ex- 
perience. 

Automating the data-gathering function 
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has specific appeal for recurring short du- 
ration response-time problems. These 
problems are usually identified by an irate 
user complaining about slow response 
time. A better alert would be a red status 
indicator, but no matter how the problem 
is identified, a diagnostician will be 
needed. Just as the diagnostician arrives 
to solve the problem, all is well; the sys- 
tem returned to an acceptable response 
time or the status indicator turned green. 
As this scenario is repeated, all parties 
become frustrated. If, when the excep- 
tional condition was recognized, the sys- 
tem had automatically gathered the ap- 
propriate information, the diagnostician 
would have had the information needed 


Structural 
components of 
an SLM system 

consist of 

monitoring, 
analysis, 
automation and 
remote control. 


to solve the problem. The automation 
of the data-gathering function has ap- 
plicability to any exceptional condition 
where a diagnostician is not immediately 
available. 

Automatic data gathering can become 
complex with many conditional paths. It 
becomes difficult to identify where auto- 
matic data gathering ends and automatic 
analysis begins. Automatic analysis could 
be described as conditional data gathering 
with a conclusion. No, automated analy- 
sis will not eliminate the need for the an- 
alyst or diagnostician. Automation will 
only free the diagnosticians from reinven- 
tion, allowing them to focus on the un- 
solved mysteries where intuition is king 


and the activity is still an art. 

For those problems where automated 
analysis is applicable, automation of the 
solution can become no more than the 
execution of a command string. If the 
problem can be resolved through a ter- 
minal, then the solution can usually be 
automated. 

As you have learned, automation is ap- 
plicable to the SLM process. It does, 
however, require unique and complex in- 
teractions between the monitoring, anal- 
ysis and automation technologies. These 
interactions require a tight technology 
coupling to minimize the automation 
overhead and to simplify the automa- 
tion effort. 


Remote Control 


Remote Control is the fail-safe com- 
ponent of an SLM system. No matter how 
much or how little the SLM system is 
automated, something will inevitably go 
wrong. When this happens, an expert is 
needed immediately. If the expert is off- 
site, a technology is needed to deliver the 
problem to the expert. This technology 
should have the capability to remotely alert 
the expert of the presence of a service 
problem and additionally provide the 
needed remote system access and controls 
to solve the problem. The ever-increasing 
decentralization of computing systems, 
along with the always decreasing availa- 
bility of experts, positions remote control 
technology as a required component of 
any effective SLM system. 

In summary, automated service level 
management consists of an integrated sta- 
tus management system to focus and align 
the organization, a tightly-coupled auto- 
mation system to automatically analyze 
and correct SLM problems and, last but 
not least, a remote management system to 
facilitate remote diagnosis and repair. = 
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Tuning VSAM Index Control Intervals 


Calculating VSAM’s 
Key ¢ Se wt 


By Michael D. Sachais 


nce you know the key compres- 
():: rate, use that information to 
calculate an appropriate index 
Control Interval (CI) size. This article will 
teach you how to print and read index 


records (similar to reading a dump) to de- 
termine VSAM’s key compression rate. 


Printing An Index Record 


Figure | is a printout of a portion of an 
index record from the index component 
of a cluster named MY.KSDS.FILE. 
The name of the index component 
is MY.KSDS.FILE.INDEX. The index 
printout was generated using the follow- 
ing IDCAMS command: 

PRINT INDATASET(MY.KSDS. FILE.INDEX) DUMP COUNT(4) 

The IDCAMS PRINT command is used 
to print VSAM clusters and their com- 
ponents. The above PRINT command 
tells IDCAMS to print four records 
(COUNT(4)) from the index component 
MY.KSDS.FILE.INDEX in DUMP for- 
mat. When printing the index records of 
a cluster, you should always print the rec- 
ords using the DUMP parameter of the 
IDCAMS PRINT command. This will 
print the index record in a format you can 
analyze. You should also print between 
five and 15 index records (using the 
COUNT parameter). This will give you 
a sufficient sample of the index records 
for your analysis. Only four index records 
will be printed in the above example be- 
cause I know that there are only four in- 
dex records in the index component of 
this cluster. 

Another parameter of the PRINT com- 
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mand which should be used is the SKIP 
parameter. The SKIP parameter when used 
with the PRINT command allows you 
to print records in different parts of a 
component. For example, the following 
PRINT commands may be used to print 
six index records in an index component 
that contains 50 index records. 

PRINT INDATASET(MY.KSDS.FILE.INDEX) DUMP COUNT(2) 

PRINT INDATASET(MY.KSDS.FILE. INDEX) DUMP COUNT(2) SKIP(20) 
PRINT INDATASET(MY.KSDS. FILE. INDEX) DUMP COUNT(2) SKIP(40) 

In the first PRINT command there is 
no SKIP parameter. Therefore, two index 
records (COUNT(2)) will be printed start- 
ing with the first index record in the index 
component. No records will be SKIPPED. 
In the second PRINT command the first 
20 index records in the index component 
will be SKIPPED over. Then, two 
(COUNT(2)) index records will be 
printed. In the last PRINT command the 
first 40 index records in the index com- 
ponent will be SKIPPED over, then two 
(COUNT(2)) index records will be 
printed. 

Using these three PRINT commands 
together allows you to get a sample of the 
index records from the beginning, middle 
and end of the index component. This will 
give you a more accurate calculation of 
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the key compression that is occurring in 
the cluster. This is helpful if the key 
compression varies in different parts of 
the cluster. It is, therefore, recommended 
that you use the SKIP parameter when 
PRINTing index records. 

For a further explanation of the ID- 
CAMS PRINT, SKIP and COUNT com- 
mands see the IBM VSAM Catalog 
Administration: Access Method Services 
Reference manual. 


Analyzing An Index Record 


Analyzing the information in an index 
record is similar to reading a dump. It 
consists of translating hexadecimal num- 
bers into meaningful information. Like 
reading a dump, reading index records gets 
easier the more you do it. Because the 
information stored in an index record is 
recorded in hexadecimal values, I rec- 
ommend using a calculator which can cal- 
culate in both hex and decimal to aid in 
your analysis. This will expedite the 
translation process of the information in 
the index record. I personally find it much 
easier to work with decimal values than 
hexadecimal values. 

The following sections describe the in- 
formation stored in an index record that 
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you will use to calculate the average length 
of the key entries in an index record. 


New Index Record Identifier 


The NEW INDEX RECORD IDEN- 
TIFIER is not actually part of an index 
record, but rather a label printed out by 
the IDCAMS PRINT command. It can be 
used to identify the individual index rec- 
ords that have been printed by the ID- 
CAMS PRINT command. Each index re- 
cord that is printed will be preceded by 
the label “‘RBA OF RECORD — 
XXXXXX,’’ where XXXXXX is the RBA 
of the index record. In Figure |, the index 
record you will be analyzing is identified 
by the label RBA OF RECORD — 0. 


Length Of The Index Record 


The first two bytes of information start- 
ing at offset X’00’ in an index record is 
the length of the index record. This will 
always equal the index CI size minus 
seven. In Figure 1, the two bytes at offset 
X’00’ are OSF9. The hexadecimal value 
OSF9 converted into decimal is 1529. Fig- 
ure 2 illustrates a partial LISTCAT for the 
KSDS cluster named MY.KSDS.FILE. In 
this figure you can see that the INDEX 
CISIZE for the cluster MY.KSDS.FILE 
is 1536 bytes (CISIZE in the INDEX AT- 
TRIBUTES subsection). The size of the 
index record is, therefore, 1529 (1536 — 
7) bytes. 


Length Of The Key Entry 
Control Information 


The one byte of information located at 
offset X’02’ in an index record is the 
length of the control information in each 
key entry. The length of the control in- 
formation can be three, four or five bytes. 
You may recall control information con- 
sists of the number of characters com- 
pressed from the front of the key, the 
length of the key and the pointer to the 
associated data control interval. 

In Figure 1, the one byte at offset X’02’ 
is 03. This means that the control in- 
formation in each key entry is three 
bytes long. 


Length Of The Key Entry 
Vertical Pointer 


The one byte of information located at 
offset X’03’ in an index record is the 
length of the vertical pointer in each key 
entry. The length of the vertical pointer is 
dependent on the number of Cls in a Con- 
trol Area (CA). The length of the vertical 
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pointer can be one (indicated by X’01’), 
two (indicated by X’03’) or three (indi- 
cated by X’07’) bytes long. 

In a Sequence Set Index (SSI) record, 
a vertical pointer will be a pointer to one 
of the data CIs in the CA governed by the 
SSI record. In an index set index record, 
a vertical pointer will be a pointer to one 
of the index CIs to which the index record 
points. Remember, SSI records will con- 
tain the highest key in each of the data 
Cls in the CA it governs. Index set index 


records will contain high keys in the in- 
dex records on the preceding level of the 
index structure. Therefore, the pointers in 
the different types of index records will 
point to the proper type of CI. 

In Figure 1, the one byte at offset X’03’ 
is O01 indicating that vertical pointers in 
the index record will be one byte in length. 


Index Record Type Indicator 


The one byte of information located at 
offset X’10’ in the index record indicates 
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VSAMVI “re 


Your building 
block to 
a better 
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the type of index record (index set or se- 
quence set) and on what level the index 
record exists. SSI records always have a 
level indicator of X’01’. The next higher 
level of index has a level indicator of 
X’02’ and so on. 

When calculating the average key 
length, you should only analyze the in- 
formation in SSI records which are deter- 
mined by a level indicator of X’01’. The 
purpose of tuning index Cls is to ensure 
that the index CI is large enough to ad- 
dress all of the data CIs in the CA gov- 
erned by the index record. SSI records are 
the only type of index record pointing to 
CAs. Therefore, SSI records are the only 
type of index records that need to be ana- 
lyzed when calculating the average key 
entry length. 

In Figure 1, the one byte at offset X°10’ 
is 01 indicating this index record is part 
of the sequence set. Therefore, it may be 
used to calculate the average key entry 
length. 


Beginning Address Of The 
Unused Space In The 
Index Record 


The two bytes of information starting 
at offset X°12’ in the index record gives 
you the address within the index record 
where the unused space in the index re- 
cord begins. If you subtract X°18’ (the 
length of the index record header) from 
this number, you can calculate the length 
of the free CI pointer list within the index 
record. 

If the address of the unused space is 
X’0018" (the end of the header informa- 
tion), you can conclude that there is no 
free CI pointer list in the index record 
because the free CI pointer list is stored 
between the header information and the 
unused index record space. 

In Figure 1, the two bytes starting at 
offset X’12’ are 006A (decimal 106). If 
you look at address X’006A’ (located on 
line 000060 in the third column), you 
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0100006A 
7D7C7B7A 


o0C2D5D2 
FOFOF940 


can see where the unused space (binary 
zeroes) in the index record begins. You 
can count that there are seven bytes of 
unused space in the index record (the last 
byte of binary zeroes is preceded by the 
byte X’C2’). 

To calculate the length of the free CI 
pointer list, subtract X’18" from X’006A’. 
This gives you a result of X’52° (decimal 
82). This number tells you that the free 
CI pointer list is 82 bytes long. 


The Free Control Interval 
Pointer List 


The free CI pointer list begins imme- 
diately following the header information 
(at offset X°18’ in the index record) and 
ends immediately before the start of the 
unused space in the index record. Its 
length depends on the number of pointers 
in the list and can be calculated by sub- 
tracting X’18’ from the address of the start 
of the unused space in the index record. 

If the unused space begins at offset 
X’0018’, there is no free CI pointer list 
in the index record. This means all of 
the data CIs in the CA are utilized and 
the size of the index CI is large enough 
to store the keys of all the data Cls in 
the CA. 

Free CI pointers are stored in the list 
in descending order and used from right 
to left beginning with CI 0. Therefore, 
the first (leftmost) pointer in the list rep- 


0  MAXLRECL-——-—----—- 56 
SPEED UNIQUE 
UNORDERED REUSE  NONSPANNED 
INDEX ---------- MY.KSDS. FILE. INDEX 
ATTRIBUTES 
REVLEN ee 1. WHDRECL« 5 
RKP) MAXLAECL-——-——---- 5 
SHROPTNS(2,3) RECOVERY UNIQUE 
REUSE 


AVGLRECL------------------ 
1 
NOERASE 


NOERASE 


resents the last CI in the CA that will 
be used. 

The last pointer in the list is located 
immediately before the unused space in 
the index record and will point to the next 
data CI to be used in the CA. It is im- 
portant to note that if all the records in a 
data CI are deleted, the CI is considered 
“‘free’’ and the pointer to that CI is re- 
added to the free CI pointer list. There- 
fore, the pointers in the list will not nec- 
essarily be in numerical order. 

To begin analyzing the free CI pointer 
list, you first need to determine the num- 
ber of data CIs in the CA governed by 
the index record. This will help you to 
determine the number of used and unused 
CIs in the CA. The number of data Cls 
in the CA can be obtained from the CI/ 
CA value in the DATA ATTRIBUTES 
subsection of the LISTCAT. 

The number of data CIs in the CA to 
which the index record addresses in Fig- 
ure | is 150. This is shown by the CI/CA 
value in the DATA ATTRIBUTES sub- 
section of the LISTCAT in Figure 2. 

Now that you know how many data CIs 
there are in the CA, you need to deter- 
mine the number of unused and used data 
Cls in the CA. 

To determine the number of unused data 
Cls in a CA, you need to determine the 
number of pointers in the free CI pointer 
list. This will tell you the number of un- 
used data CIs in the CA. 

Subtracting X’18’ (the length of the in- 
dex header) from the beginning address 
of the unused space in the index record 
will allow you to calculate the length of 
the free CI pointer list. Dividing the length 
of the list by the length of each pointer in 
the list (given at offset X’03’ in the index 
header) will allow you to calculate the 
number of pointers in the list. This is also 
the number of unused data CIs in the CA. 

In Figure 1, subtracting X°18’ (the 
length of the header) from X’006A’ (the 
beginning address of the unused space in 


BUFSPACE----------------~ 
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the index record) yields a result of X°52° 
(decimal 82). This is the length of the free 
CI pointer list (82 bytes). To calculate the 
number of pointers in the list (unused data 
Cls in the CA), divide X’52’ (82 decimal) 
by one (the one byte at offset X’03° is 01 
indicating that the free CI’s pointers (ver- 
tical pointers) are one byte in length). This 
yields a result of X’52’ (82 decimal). 
There are 82 pointers in the pointer list, 
which means that there are 82 unused data 
CIs in the CA to which this index record 
points. 

You can now use the number of unused 
data Cls to calculate the number of used 
data CIs in the CA. To calculate the num- 
ber of used data CIs in the CA, simply 
subtract the number of unused data Cls 
from the number of data CIs in the CA. 

Using Figure 2, the number of used data 
Cls in the CA can be calculated as fol- 


lows: 
68 = 150 - 82 
Used Data Data Unused Data 
Cls CI/CA Cls 


There are 68 out of 150 used data Cls 
within the CA. Therefore, only 45 per- 
cent of the CA is being utilized; 55 per- 
cent is being wasted. 

Calculating The Average Key 
Entry Length 


The information you have just calcu- 
lated can be used to easily calculate the 
estimated average length of a key entry 
in the index record. It is important to un- 
derstand that the values you will calculate 
are only estimates. The amount of key 
compression will vary between keys and 
index record. Therefore, you cannot cal- 
culate an exact average key entry length 
for the keys in each of the index records 
of the cluster although an estimate of this 
value should suffice in calculating a proper 
index CI size. 

To calculate the average key entry 
length in an index record, perform the fol- 
lowing steps. 


1) Determine the Beginning Address 

Of The First Key Entry 

The first key entry in the index record 
is located immediately after the last byte 
of unused space in the index record. The 
starting address of the unused space, you 
may recall, begins at offset X°12’ in the 
index record for two bytes. To locate the 
first key entry, scan through the unused 
space until you reach the first non-zero 
byte. This character will be the first char- 
acter of the first key entry. Record the 
address of this byte. 

In Figure 1, the starting address of the 
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unused space is X’Q06A’. Scanning 
through the contiguous string of binary 
zeroes (X’00’), the first non-zero byte 
reached will be X’C2’ at offset X°71” in 
the index record. This is the beginning 
address of the first key entry. 


2) Determine The Number Of Used 

Data CIs In The CA 

The number of pointers in the free Cl 
pointer list is used to determine the num- 
ber of used data Cls in the CA. The cal- 
culation used to determine the number of 
used data CIs in the CA was discussed in 
The Free Control Interval Pointer List 
section earlier in this article. 

In this section, it was determined that 
68 data CIs in the CA were used. Record 
this number. 


3) Calculate The Amount Of Space 

Used By The Key Entries 

The amount of space used in the index 
record to store the key entries can be cal- 
culated as: 


Total Space 
Used By = Index Record Length — Beginning Address 
Key Entries Of Key Entries 


By subtracting the beginning address of 
the key entries in the index record from 
the length of the index record, you elim- 
inate the space in the index record used 
by the header, free CI pointer list and un- 
used space. This leaves you with the space 
in the index record used to store the key 
entries. 

In Figure 1, the length of the index re- 
cord (the first two bytes of information 


starting at offset X’00’) is X’05F9’. When 
converted to a decimal value, the length 
of the index record is 1529 bytes. The 
beginning address of the key entries is 
X’71° (decimal 113) which was deter- 
mined in step | above. Therefore, the 
space in the index record used by the key 
entries is 1416 bytes (1529 — 113). 

4) Calculate The Average Key Entry 

Length Per Data CI 

Now that you know the space used by 
the key entries (step three) and the num- 
ber of used data CIs (step two), you can 
calculate the average key entry length per 
data control interval as: 


Average Key Space Used Used Data 
Entry = By / Control 
Length Key Entries Intervals 


The average key entry length is only an 
approximation of the length of a key entry 
in the CA governed by the index record. 
To get a better estimate of the average key 
entry length in all the CAs in the cluster, 
you need to perform steps one through 
four on various other index records. I rec- 
ommend analyzing between five and 15 
SSI records in the index component of the 
cluster and calculating an average from 
the results you get in your calculations. 

For example, if you analyze five index 
records and the average key entry lengths 
you calculate are 8, 12, 10, 10 and 9, use 
the average of these numbers (10) as the 
average key entry length. When averag- 
ing the numbers to arrive at a final aver- 
age key entry length, always round up. It 
is better to overestimate the key entry 
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length than underestimate it. Use the fol- 
lowing guidelines to round your numbers: 
* If the calculated average key entry 
length contains a decimal value greater 
than or equal to .5, round up to the 
nearest whole number and add one; 
for example, if the average key entry 
length is calculated as 9.6, use 11 
(9.6= => 10 + 1) as the average 
key entry length 
If the calculated average key entry 
length contains a decimal value less 


VSAM 


than .5, round up to the nearest whole 
number; for example, if the average 
key entry length is calculated as 9.1, 
use 10 (9.6= => 10) as the average 
key entry length. 
Using Figure 1, the average key entry 
length for the CA governed by the index 
record would be calculated as: 


2062 = 1416 / 68 
Following the rounding rules, this 
number would be rounded to 22 


(20.82= => 21 + 1). For the sake of 
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simplicity in this example, analyze only 
one index record and use the average key 
entry length of 22 in any further calcu- 
lations. 


5) Calculate The Minimum 

Acceptable Index CI Size 

Knowing the average key entry length 
per data CI will enable you to calculate 
the minimum CI size needed to store the 
key entries for all the data CIs in the CA. 

The minimum index CI size required 
can be calculated as: 
Minimum Index Average Key 

Cl = Entry xX 
Size Length 

The minimum index CI size must be 
rounded up to the next valid index Cl size. 

The number of data CIs per CA (CI/ 
CA) is determined by the size of the data 
Cls and the CA and may be obtained from 
the LISTCAT CI/CA value. From step 
four you determined the average key en- 
try length is 22 bytes. The minimum in- 
dex CI size required for the cluster 
MY.KSDS.FILE can be calculated as: 


CI/CA 


3300 22 X 150 
Index = Avg Key Data 
Cl Size Entry Length CI/CA 


The calculated index CI size of 3300 
needs to be rounded up to 3584 which is 
the next valid index CI size. From the 
above calculations you can conclude that 
an index CI size of 3584 should be large 
enough to store the keys of all the data 
CIs (150) in the CAs of the cluster. 

In the next article you will learn how 
to test and choose what index CI you 
should use to DEFINE a given cluster. 
You will then be able to accurately tune 
the index CI size for a given VSAM KSDS 
cluster which in turn will minimize DASD 
space utilization by the cluster and mini- 
mize BATCH and CICS processing times 
when processing the cluster. = 
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Q We are currently running VSE/SP 2.1.5, CICS/VS 1.6.0 
and VSE/VSAM 1. 3. We have one application running un- 
der CICS that logs transaction records to a VSAM ESDS 
dataset, which has an alternate index associated with it. The 
problem we experience is that when CICS crashes for one 
reason or another, apparently the VSAM buffers are not 
written to DASD, leaving the base cluster and alternate index 
out of sync. I cannot seem to get a SHAREOPTION on the 
datasets to force the physical I/O for each write, because I 
cannot find the right combination of FCT entries that will 
allow the path to be opened without getting a VSAM open 
error 168. 

Is there a combination of entries in the FCT that will allow 
these files to open with the SHAREOPTION(4) or is there 
another way to guarantee that these files stay in sync, in spite 
of a system crash? 


A CICS/VSE users are exposed to this type of integrity problem 
when working with VSAM alternate indexes. The problem you 
encounter is not due to the shareoptions you have chosen, nor 
can it be solved simply by selecting a different set of CICS FCT 
parameters. The problem stems from interaction between CICS 
and VSAM function and the fact that a single request from CICS 
to update a VSAM file record may result in updates to an entire 
set of AIX records ‘‘under the covers.’’ With a system failure 
during this process, AIX records can be out of sync with the 
base cluster and CICS recovery actions will be unable to correct 
the condition. CICS Emergency Restart will run fine and trans- 
action backout will operate normally, but the AIXs will remain 
out of sync. 

Incidentally, this response assumes you use CICS logging and 
recovery functions, although the synchronization problem would 
exist even if you did not. You describe your VSAM file as ESDS 
with an AIX attached to it and CICS has different problems 
backing out changes to ESDS files. In fact, additions made 
during normal processing cannot be deleted by Emergency Re- 
start and user design needs to consider if these records are to 
be marked as logically deleted during recovery and coding added 
to recovery exits as needed. 

Typically, AIXs are defined as part of the “‘upgrade’’ set, 
which means that an update being made to the base cluster 
record may be reflected automatically in one or more of the 
alternate indexes. When you add a record to a VSAM cluster, 
most if not all of the alternate indexes will also be updated — 
in some cases with record additions and in others, with updated 
index records. 

This AIX updating occurs before the base cluster record is 
written to disk and, as a result, if an error occurs while the 
updating is in process, the index records may point to keys 
which do not yet exist in the base cluster. Before CICS issues 
the VSAM WRITE, it writes a record to the log indicating the 
requested change for the use of Emergency Restart. When 
Emergency Restart is invoked to back out changes for in-flight 
transactions, VSAM will not recognize a need to correct alter- 
nate index records if the original base cluster record is still 
intact. This results in indexes and the base cluster being out of 
sync and the result is a loss of integrity. 
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One solution used by many customers is to rebuild alternate 
index datasets when a crash occurs. In this mode of operation, 
when a CICS or system crash occurs and Emergency Restart is 
anticipated, the base clusters are first VERIFYed and then the 
AIXs are rebuilt. This step brings the AIX and base cluster back 
into sync and Emergency Restart can begin. Another option is 
to define all AIXs as NOUPGRADE, which means VSAM will 
not keep them updated as the base is updated. Where UP- 
GRADE is still desired for major batch updating, then you may 
wish to define a NOUPDATE path into the base which is used 
for no other purpose than to tell VSAM to turn off the UP- 
GRADE option for this invocation of the base. 

In the latter case, you become responsible for maintaining 
the AIXs, either through BLDINDEX or user program. 

Another approach which eliminates the integrity problem is 
to process the AIX and base cluster as two separate files. In 
effect, you take on the responsibility for keeping the cluster and 
its indexes in sync, which can entail considerable effort. In this 
case, the files are treated separately by CICS and, for KSDS 
files, are fully recoverable. ESDS again provides the challenge, 
needing user code additions to standard CICS recovery functions 
and possible changes to application design to ensure full re- 
coverability. 

Physical write to the dataset will occur regardless of the se- 
lected shareoptions. Shareoption 2 should be used for both the 
VSAM base cluster and the AIX. Ensure only one (base or AIX) 
has update processing options defined or you will encounter 
OPEN errors with Shareoption 2. CICS/DOS/VS supports re- 
cord updating through either base or AIX, not both. Update 
through the base cluster only is strongly recommended. 
(Answer provided by Bob Cornell and Dan Janda of IBM) 


Q When would you use the REPRO/MERGECAT function 
of Access Method Services? 


A A good time to use REPRO/MERGECAT is if there is per- 
formance degradation due to too large a catalog (with multiple 
aliases pointing to it). Another time to consider using REPRO/ 
MERGECAT is if you have a critical (such as on-line) appli- 
cation and the catalog entries are in a large multi-aliased catalog. 
If that catalog had to be recovered, the downtime to the appli- 
cation could be costly. There are, of course, other reasons to 
use REPRO/MERGECAT, but I feel that performance, availa- 
bility and recoverability should be the key considerations. Here 
are a few general rules regarding catalogs: 


* Non-system related datasets should be in user catalogs 


* Catalogs should be backed up at least once daily along with 
an integrity check 

* Have several user catalogs versus one large user catalog 

* Periodically reorganize catalogs 


* Monitor performance (note that when the number of index 
levels is greater than two, performance will start to de- 
grade). 

(Answer provided by Mike Bowbin of Davis, Thomas & Associates, 
Minneapolis, MN) 
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Orion Solid 
State Disk Battles Poor 
Response Time 


istorians are fond of noting that 
Hee who ignore the past are 

condemned to relive it. They do 
not take into account that if MIS man- 
agers run out of computer capacity to 
process payroll, they will not have the 
opportunity to relive the experience. Un- 
employment lines are filled with MIS 
managers who failed to recognize the 
problems of capacity performance and 
management. 

One of the biggest problems MIS man- 
agers face is the seemingly insatiable de- 
mand for memory and storage. The trend 
toward on-line processing and ballooning 
information storage requirements created 
by the growth of databases and end-user 
computing has caused runaway growth in 
the demand for DASD. According to 
leading industry-watchers, the DASD ca- 
pacity growth rate has averaged 35 per- 
cent for the past five years and that growth 
is likely to continue. Unchecked, DASD 
demand can eat up DP budgets and cause 
monumental headaches for both MIS staffs 
and end-users. 

Computer managers usually respond to 
the need for more DASD by getting more 
disk drives. But rotational disk systems 
impose a large measure of inefficiency. 
An increasingly popular alternative to ro- 
tational disk devices is solid state disk de- 
vices. These devices, like the ORION 
Solid State Disk Subsystem from EMC 
Corporation (Hopkinton, MA), are hard- 
ware alternatives to traditional rotational 
devices. 

EMC competes with STK (formerly 
Storage Technology), National Advanced 
Systems (NAS), Memorex/Telex and 
Amdahl Corporation (see Table 1). Al- 
though EMC is currently the junior mem- 
ber of the fraternity selling solid state de- 
vices, it enjoys the highest rate of growth, 
gaining 10 percent of the market from the 
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By John Kador 


Solid State 
Storage — Worldwide 
Market Share by MEG. 


STK 42.0% 


Memorex/Telex 21.5% 
Amdahl 13.5% 
NAS 13.5% 
EMC 9.5% 


There were 120,000 MEGS of solid state stor- 
age sold worldwide in 1988. The percentage 
figures represent market share by MEG sold. 


Source: International Data Corp., 
Framingham, MA 


bigger players in its first year. To under- 
stand why this is so, it is useful to take a 
brief look at the marketplace in which it 
competes. 

STK offers its own solid state subsys- 
tem. NAS and Memorex/Telex sell a solid 
state device manufactured by Hitachi. 
Amdahl markets a device manufactured 
by Fujitsu. EMC manufactures and field 
supports its own design. The point is, 
EMC’s competitors all had existing disk 
controllers. They took the existing con- 
troller designs and added new devices 
which emulated solid state storage. 

In June 1989, EMC and STK agreed 
that the ORION/VL solid state disk tech- 
nology will become the basis for the STK 
4080 Solid State Disk. Under this agree- 
ment, EMC will provide STK with the 
VL technology on an OEM basis for use 
in the 4080. EMC will continue to market 
only the ORION/ST. Marketed under the 
STK label, the 4080, for the first time in 
STK history, will offer both battery and 
hard disk. 

The ORION/VL, the first octal director 
solid state disk device, was introduced in 
late 1988. Each director has a dedicated 


path to data. Thus, users can simulta- 
neously access eight different CPUs or 
channels. Previously, users seeking eight 
paths to data were forced to use a four 
director unit with channel switching. 
While channel switching on four directors 
provides eight paths to the CPU, the paths 
cannot be accessed simultaneously. 


Starting From Scratch 


EMC, by contrast, did not have an ex- 
isting disk controller to modify. Instead, 
the company had to start from scratch. 
“‘If it already had its own disk controller 
(like the other companies), it probably 
would have done the same thing,’’ sug- 
gests Dave Valente, an analyst with In- 
ternational Data Corporation (Framing- 
ham, MA). ‘‘But it didn’t and as long as 
EMC was going to spend the money, the 
company decided to do it right.”’ 

One result is all circuitry is on the board 
level. The benefits of this compactness 
are immediate. By integrating the con- 
troller and memory into the same physical 
backplane, EMC reduced overhead and 
footprint requirement. First and most ob- 
viously, the environmental differences be- 
tween the EMC box and the competition 
are staggering. The ORION looks like a 
PC in a tower configuration versus a cou- 
ple of refrigerators. Installation is said to 
require less than one hour. More signifi- 
cantly, performance also is boosted, due 
in part to the physical proximity of the 
circuitry on the board (see Figure 1). 

A university reduced average response 
time from 4.8 seconds to 1.1 seconds. 
Before ORION, 90 percent of transac- 
tions were satisfied in 4.8 seconds; after 
ORION, 90 percent of transactions were 
satisfied in 1.1 seconds. The number of 
screens processed per day increased 21 
percent after ORION was added. This 
performance analysis was conducted by 


Indiana University on an IBM 4381-P13 
under VSE for a number of CICS appli- 
cations. Measurements were made by a 
commercial CICS monitor over a three- 
month period. The university used an 
ORION/ST 64MB single director. 

How does a data center know when the 
addition of a solid state disk would be 
appropriate? Because a solid state sub- 
system is fast, the prime indication is a 
need for immediate response times for 
critical applications. Solid state disk sys- 
tems virtually eliminate I/O bottlenecks 
caused by high page or swap rates. Users 
who define a solid state disk as their pri- 
mary paging devices report faster access 
to heavily accessed shared data. Besides 
faster response times, it is also important 
to have consistent response times to main- 
tain high levels of user productivity. Oc- 
casional lightning fast response times may 
actually degrade productivity because they 
make sluggish response times more ob- 
jectionable by contrast. 


Three Generations 


The ORION series is representative of 
the third generation of solid state storage 
devices. The first generation, circa 1983, 
centered around the Intel 3805 and STK 
4305. These units were limited in capac- 
ity. They emulated IBM 2305 fixed head 
architecture. They were used almost ex- 
clusively for paging applications. Envi- 
ronmentally, these units required large 
amounts of floor space and electrical 
power. They vented high levels of heat, 
as well. 

The second generation of solid state disk 
subsystems, circa 1985, was built around 
the STK 4380 subsystem. Memorex and 
NAS introduced the Hitachi system. These 
systems demonstrated increased capacity 
and first offered hard disk and battery 
backup options. These options first made 
the systems useful on a large scale for 
applications other than paging (for ex- 
ample, database indexes or load librar- 
ies). The footprints of second-generation 
systems averaged about 20 square feet, a 
considerable improvement over first-gen- 
eration designs. 

The third-generation solid state subsys- 
tems, offering still higher capacities, are 
more compact and more reliable. They 
are based on |MB chip technology and, 
as a result, draw less power, generate less 
heat and are more reliable across-the- 
board. Users are increasingly putting 
heavily accessed data on third generation 
systems with hard disk and battery backup. 
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ORION Reduces Average 
Response Time; Increases 
Average Screens/Day Processed 


Average Response Time 


Response time 
measured in seconds 


Before With 
ORION ORION 


Number of Screens/Day 


Number of Screens 


With 
ORION 


Before 
ORION 


Source: Indiana University, Terre Haute, IN 


Headache For Dresser Industries 


System performance was a big head- 
ache for MIS Director Richard Ford at 
Dresser Industries, a construction and 
mining equipment manufacturer in 
Broadview, IL. Due to a combination of 
factors, the company was forced to down- 
grade from a 4381 Model 14 to a slower 
4381 Model 3 during a time when CAD/ 
CAM users were complaining of poor 
response times. In May 1988, Dresser in- 
stalled ORION as a preferred paging de- 
vice on VM/SP systems. There were im- 
mediate across-the-board improvements, 
recalls Ford. Specifically, the number of 
users in resource queues across the 16MB 
and 32MB configurations decreased by 17 
percent and 35 percent, respectively. 

Improvements in paging and queuing 
were expected. But ORION unexpectedly 
caused a reduction of CPU utilization, as 
well. According to Ford, the *‘16MB unit 
retrieved 66 percent of our CPU and the 
32MB unit saw a 15 percent reduction in 
total CPU utilization. The bottom line is 
that all complaints regarding response time 
have vanished and our CAD/CAM users 
are happy with system performance.”’ 


DASD Discipline 

System performance problems are the 
purview of DASD capacity management, 
a discipline that attempts to deal with per- 
formance problems using either software 
or hardware or a combination of both. 
Some software packages help clean up 
inefficiencies in the way files are stored, 
netting additional usable space. This may 
be accomplished by pooling space, com- 
pressing data, providing a non-specific 
volume allocation facility for some data- 
sets, building into each volume a cushion 
of unused space for secondary allocations 
of existing datasets or by fine tuning ex- 
isting files in a variety of ways. Some 
packages dynamically allocate space, ar- 
chive data on the basis of logical state- 
ments or predict how much space a given 
dataset will take up. Others apply prin- 
ciples of storage hierarchy management 
or systems managed storage to avoid the 
use of expensive storage media for data 
that is seldom used. EMC’s ORION solid 
state subsystem is another alternative for 
users to address performance problems. 

The ORION subsystems boast fast re- 
sponse, small footprints and low power 
consumption. ORION solid state subsys- 
tems are 100 percent compatible with all 
IBM S/370 architecture CPUs and PCM 
computers including Amdahl and NAS 
systems. Because data recovery is an im- 
portant issue, EMC offers battery and 
Winchester hard disk backup options to 
guard against loss of data due to power 
failure. 

The ORION system offers access times 
of 0.1 millisecond, transfer rates of 1.0 
to 4.5MB/sec per director, logical vol- 
umes of one to 16, DASD images of 3370 
FBA and 3380 CKD and either one or two 
directors. Maximum capacity for the sys- 
tem is 512MB (single director) or 4483MB 
(dual director). Pricing is calculated in 
terms of megabytes of storage at $1400 
per megabyte plus maintenance of $4.20 
per megabyte (for 16 to 48 megabytes). 
The cost per megabyte decreases as cus- 
tomers install larger systems. The cabinet 
for the initial configuration is provided at 
no cost. Additional cabinets are $7500. 

For more information, contact EMC 
Corporation, 171 South St., Hopkinton, 
MA 01748-9103, (617) 435-2541 or (800) 
222-EMC2. = 
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Integrity Solutions, Inc. 


leading supplier of data integrity 

software for IBM mainframe organ- 
izations with VSAM batch and CICS/ 
VS environments. With more than 1200 
products installed at 600-plus data centers 
worldwide, the company is the largest 
provider of data recovery and journal 
management software to this market- 
place. 

ISI pioneered VSAM data recovery with 
the introduction of the DATA RECOV- 
ERY SYSTEM (DRS) in 1981. Founders 
Jerome Nickerson and Karl Schulz bring 
more than 40 combined years of experi- 
ence in the forefront of this technology to 
the development of DRS. The original 
DRS product was written for Central Bank 
of Denver, CO to assure the integrity of 
its Hogan Banking System’s data. The 
marketing rights for DRS were retained 
by the developers and DRS was success- 
fully marketed to additional banks and fi- 
nancial institutions that first year. Today, 
the company’s products are installed in 
virtually every type of industry including 
banking/financial, insurance, govern- 
ment, retail, manufacturing, education and 
service. 

As the needs of the marketplace have 
changed, DRS has grown to meet these 
requirements. In addition, new products 
were developed to address evolving needs 
of the customer base. The JOURNAL 
MANAGEMENT SYSTEM (JMS) pro- 
vides automatic journal archiving for 
CICS/VS journals and logs, the INTEG- 
RITY CONTROL SYSTEM (ICS) auto- 
mates the recovery process and MAX/SPF 
brings powerful programmer productivity 
assistance to TSO/ISPF users. 

All of ISI’s data integrity products are 
designed to work together to provide sys- 
tem-wide data integrity. However, each 
product may also be purchased separately 
to address specific user requirements 
and then integrated with other products 
when needed to form custom-configured 
systems. 

DRS/UPDATE and DRS/RECOVER 
provide alternate methodologies for fast 
and accurate forward or backward data 
recovery between backups for VSAM files 
updated by CICS/VS. DRS uses backup 
files (either installation- or DRS-pro- 


[isi Solutions, Inc. (ISI) is a 
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From left to right are Jerome Nickerson, 
President, Toni Hippeli, Vice President of 
Corporate Development and Karl Schulz, Vice 
President of Research & Development. 


vided) and CICS/VS journal records as 
input to the recovery process. DRS/RE- 
COVER is unique in providing 24-hour 
availability of VSAM files to CICS/VS 
while the backup process takes place. Both 
VSE and MVS operating systems are 
supported. 

DRS/BATCH provides comprehensive 
recovery for VSAM batch environments 
by transparently journaling VSAM up- 
dates. With DRS/BATCH, batch job re- 
start and rerun time is reduced and redun- 
dant backups can be eliminated. DRS/ 
BATCH assures that your batch process- 
ing is completed on time and within your 
“narrowing batch processing window.” 

JMS/SWITCH, which was introduced 
in the fall of 1986, ensures the integrity 
of CICS/VS journals and logs by auto- 
matically archiving them with no com- 
puter operator intervention. It prevents 
accidental overwrites. JMS/SWITCH also 
manages the job submission process and 
its extended features significantly en- 
hance the on-line management of the en- 
tire journaling environment. 

ICS/MANAGER, introduced in July 
1989, is the newest component in a sys- 
tem-wide data integrity system. It acts as 
a data integrity umbrella and may be op- 
tionally combined with any or all of ISI’s 
other data integrity products to automate 
the recovery process and assure even faster 
and more accurate recovery. ICS/MAN- 
AGER automatically registers and man- 
ages all critical backup and journal infor- 
mation on a global control dataset. It 
serves as a single repository of all essen- 
tial information needed for an error-free 


recovery and it automatically generates 
and submits customized recovery JCL 
when needed. Future releases of ICS/ 
MANAGER will manage recovery across 
additional operating environments such as 
DL/1, IMS and DB2. 

MAX/SPF is a new productivity en- 
hancement tool for TSO/ISPF program- 
mers. It provides faster and easier access 
to frequently-used datasets and PDSes 
with a unique customized DATASET 
NAME LIST. It also consolidates com- 
monly used ISPF/PDF functions into one 
single, more flexible facility. MAX/SPF 
edits all VSAM and SAM files in tradi- 
tional full-screen mode or COBOL Copy- 
book layout option. 

ISI’s corporate offices are located in 
Littleton, CO, a suburb of Denver. All 
domestic sales are made from this loca- 
tion. ISI has also established a strong in- 
ternational marketing organization. Eu- 
ropean distribution is handled through 
Integrity Solutions, International (ISIL) 
in London, established in 1984. ISIL 
manages distributors in the United King- 
dom, France, Italy, Spain, Portugal and 
West Germany. In addition, ISI has dis- 
tributors in Australia, Thailand, Singa- 
pore, Malaysia and Hong Kong. During 
1989, ISI plans to expand its distributor 
network to other Pacific Rim countries, 
including Japan. 

ISI is committed to setting the industry 
standard for data integrity. This commit- 
ment means continuing to provide the 
highest level of excellence in all aspects 
of the company’s operations by anticipat- 
ing customer needs, developing leading- 
edge software solutions that address these 
increasingly sophisticated requirements 
and providing the highest level of cus- 
tomer service at all times. It is currently 
involved in setting the standards in the 
emerging electronic vaulting and mirror 
image processing environments as they 
become integral components of the dis- 
aster recovery marketplace. ISI has been 
designated an authorized IBM remarketer 
for these new technologies. = 


Vendor Profile is a regular forum whereby a 
vendor is given the opportunity to introduce the 


company and its products to MAINFRAME 
JOURNAL readers. 
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Exceptional Opportunity 


SOF I Vz ... to join the recognized leader in the 
ONALS software industry. BMC, ranked first 
PROFESS! by Business Week magazine in per- 


employee investment in research and 
development, is looking for qualified 
software sales and technical support 
personnel. BMC Software employees 
INNOVATION DATA PROCESSING, the Leader in DASD Manage- develop, market and support systems 


ment and Disaster Recovery Software has opportunities available for software products to enhance IBM 
i Is i | , ing. . sa 
Software Professionals in Development, Support and Marketing mainframe technology. Opportunities 


INNOVATION DATA PROCESSING has a commitment to develop, are available for: 

deliver and support the software products users will need to manage 

their DASD Storage as they migrate into a System Managed Storage Sales Representatives 
Environment with DFSMS under IBM's ESA operating system. To ; 

help fulfill that commitment, INNOVATION is looking for individuals Requirements Include: 


who can fulfill the following roles: m= 6+ years IBM Mainframe hardware/ 


PRODUCT DEVELOPMENT Software sales experience 
Software Developers experienced with DASD Storage Management, m Top Sales Performers 

Catalog Management Services, Subsystem Interface, EXCP/SIO = Telephone sales experience a plus 
Coding and MVS Operating System Internals. 


Technical rt 
PRODUCT SUPPORT a Ca meat 
DASD Management Technician experienced in the use of Incremental epresentatives 


Backup, Archive, Space Management and Disaster Recovery; famil- Requirements Include: 
iarity with INNOVATION's FDR Family of products is highly desirable. w Excellent oral communications skills 


PRODUCT MARKETING m Previous product support experience 
Salaried Marketing Specialist knowledgeable in the needs MVS users as a DBA or Systems Programmer 
have to improve DASD efficiently and provide for Disaster Planning. in IMS. CICS. DB2 or VTAM. or 


All must be highly motivated, self starters, with a desire to work for a = Previous product support experience 
technically oriented company. as hardware/software Support 


Representative for IBM mainframe 
a? a or IBM compatible mainframe 
(201) 890-7300 = Market research skills a plus 
= Must be willing to travel 


H Piel INNOVATION At BMC, serious professionals wil 
of 


discover an atmosphere uniquely 


DATA PROCESSING conducive to both professional and 


275 Paterson Avenue, Little Falls, NU 07424 personal growth. Be a part of the 
continuing growth where talent, 
dedication and an innovative spirit 
have made BMC Software the software 
New Products industry leader. 

If you are a non-smoker and meet 
the above requirements, send your 
resume in strictest confidence to: 


EOE 


SA Auras - A Management Overview 
12 shea Issues $39/year 


SAAAY © -A Technical Journal 


2 monthly reports $250/year 


Call 800-272-2243 or 214-869-1598 IMIG 
-OR- 


Send Check or Credit Card Authorization to: 


SAA UPDATE, 5215 N. O'Connor - Suite 200 SOFTWAR re pa 


Irving, TX 75039 (Must use complete address) 


Sugar Land, Texas 77487-2002 
MASTER CARD, VISA and AMERICAN EXPRESS Accepted 


Equal Opportunity Employer M/F/H/V 


By Ronald J. Muns 


processing-driven organizations across the country: what is 

the Help Desk’s role in the DP center? It is not surprising 
that this issue should arise particularly since information , 
processing, as a competitive weapon, has expanded to include 
corporations of all types and sizes. The new information 
processing tools supported by the Help Desk are diverse and 
often complex. Besides mainframes, terminals, PCs, data 
networks and applications, there are expanding uses for 
specialized workstations, Local Area Networks (LAN), Wide 
Area Networks (WAN), expert systems and robotics. These 
new technologies will be ‘‘mission critical’? to many 
organizations in the 1990s. 

In order to better comprehend the role of the Help Desk, 
it is important to understand how the Help Desk function 
evolved, what its primary goals are and the areas that can 
hamper the DP center in realizing all of the benefits of a 
Help Desk. 

The Help Desk function has always existed in the DP 
center in some fashion. Years ago the user simply called the 
operator or programmer. In the past few years, however, two 
things occurred that formalized the Help function. One was 
IBM’s development of CSA maintenance agreements. These 
agreements reduced customer maintenance cost if customers 
established centralized control of problem management and 
reporting. The second event was the explosion of end-user 
computing tools resulting in enlightened end users calling for 
new computing capabilities and demanding assistance. The 
Information Center was eventually created to facilitate 
improved computer literacy and the automation of routine, 
clerical and analytical end-user tasks. Today, the Help Desk is 
that and more. As the DP sales force, it represents the DP 
center’s competitive services to the user market and acts as 
the user liaison communicating the market’s needs to the 
DP center. 

A fair way to evaluate the future Help Desk’s role is also 
to consider what it is not. The Help Desk is not a resource 
pared away from the DP center. It is not simply a must-have 
function to earn maintenance discounts. And, it is not 
available to pacify end users who only want to control their 
technological destiny. The Help Desk offers a new range of 


services with genuine economic value to the organization. 


IE the 1990s a common question will exist for information 


The Role Of The 
Help Desk 
In The DP Center 


As a broad state- 
ment of purpose, 
the Help Desk’s 
objective provides 
an efficient means 
toward resolving 
end-user problems. Consequently, the end user becomes more 
productive and the DP technical staff continues working on 
the never-ending backlog of program development activities. 
The user community is better equipped with the tools, training 
and support needed to solve business problems. In the day-to- 
day shuffle, the Help Desk ensures that a user’s problem 
receives a timely resolution. 

Conflict between the DP center and the Help Desk often 
revolves around the interpretation of the Help Desk’s purpose 
and role. This is not surprising due to basic differences in the 
persons best suited for the Help Desk as opposed to the 
DP center. 

Conducting a needs assessment better enables an 
organization to understand the role of the Help Desk and to 
better realize its potential. A needs assessment includes 
surveying data center supervisors and management and 
interviewing key users in the community. Questions include: 
who and where are the customers? what kind of information 
do they process? how do they use the information they 
process? with whom do they share information? what is their 
current level of automation knowledge? what problems are 
being experienced? how are they receiving help? what do 
users like best/worst about their current support? 

The Help Desk must sell itself and its role within the 
organization. A brochure or manual on services, policies and 
procedures, for example, are effective marketing approaches 
with great benefits for both the DP center and user 
community. Publishing newsletters and forming users groups, 
as well as holding open houses to familiarize new users with 
available services, are all powerful sales tools. The image of 
the Help Desk will increase within the DP center and end-user 
community if personnel will provide high level analytical 
reports, charts and graphs of call history. This data coupled 
with verbal and written analysis will allow the Help Desk to 
have a strategic impact on the DP center and information 
processing throughout the organization. = 


Ronald (Ron) J. Muns is Director of The Help 
Desk Institute and President of Bendata 
Management Systems, Inc. of Dallas. 
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iT WOULD TAKE 
THE AVERAGE 
PROGRAMMER 
2 HOURS 


TO FIND 
THE ERRORS 
ON THIS SCREEN. 


APK200 VENDOR VOUCHER SELECTION AND INQUIRY 6/15/89 
VENDOR 1000526 ACMEINC. CORPORATION 0110 14:13:22 


COMPUTED 
| INV DATE | YOU AMOUNT IST | PAY DATE | | CHECK NO 
/ 88 9,011.36 IP 112/31/ 881 10 5 
49.43 IP 15/891 
71,777.04 IP 31/881 
68.64 IP 2/31/88 1 
619.44 IP 
126.07 IP 
C 100,066.30 IP 
1 10/14/88 1 6,211.36 IP 
103/04/89 | 718.56 IP 


VOU NO|IINV NO 


9 623061 1954437067 
0 62309519562 4252 3103/06/891 40,888.61 IP 
096 19565-52053 7/89 | 994.55 IP 


12 62309819572 3702 7 103/14/891 71,222.05 IP 103/31/891 101013829 


CMD 3 ->PRINT/ CMD 7-> END THE JOB / CMD 9 -> TO RESTART / CMD 10 -> NEXT 


In fact, in the 84 seconds it will take you to finish 
reading this ad, VERIFY could log a test script 
using the current version of a program, rerun it 
with an updated version of the program, and then 
automatically identify and resolve all errors and 
unexpected results. VERIFY prevents production 
system surprises. Immediately. Interactively. 


And it performs just this efficiently on a 
variety of CICS tests including unit, regression, 
stress, integration, concurrency, and migration— 
all of which can be performed using either an 
on-line or batch approach. 


It makes the job easier, more accurate, faster, 
and maybe even a little more fun. So the average 


VERIFY" 
WOULD BE 
FINISHED 
BY NOW. 


VERIFY AUTOMATED MISMATCH ANALYSIS 


APPLICATION: VENDOR. VOUCHER FUNCTION: RUN 


SCREEN: 176 *ONLY UNEQUAL ROW’ 
ENTER COMMAND 
PFKEYS: 1-HELP 2-ROTATESCREENS 3-END 7-UP 8-DOWN 


10 20 30 40 50 
ROW: 13 - 


PREVIOUS 


7 620924 | 4548 2914 41 02/04/89 | 
CURRENT 7 620924 | 4548 2914 41 02/04/89 | 100,066.30 IP | 02/31/88 11010 
MISMATCHES: XXXX XX X 


66.30 IP | 02/28/89 11010 


programmer would not only be finished by now, 
he or she would be testing something else—so 
your systems would need less testing in the future. 
Sort of a virtuous cycle. 


If you’re in a hurry to do nothing, call or write 


us at Two Executive Drive, Fort Lee, NJ 07024. 


800-642-0177 
In Canada, call 201-592-0009. 


V4 ' On:Line Software 
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On-Line Software. The Safe Buy. 


All our products are offered with a lifetime trade-in guarantee so that the money you spend today 
is always available to meet your changing needs tomorrow. 


On-Line Software offers consulting, education and software products. We specialize in CICS, 
DB2, and CASE technologies for application development. 
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